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IDENTIFICATION 


PRODUCT CODE: AC-8635D-MC 

PRODUCT NAME : CZDQHDO CHAR L & INTR 

DATE: JUNE 1978 

MAINTAINER: DIAGNOSTIC GROUP 

NOTICE” AND SHOULD NOT BE CONSTRUED AS-A COMMITMENT SY DIGITAL 


EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 


NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 


COPYRIGHT (C) 1975, 1978 BY DIGITAL EQUIPMENT CORPORATION 
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ABSTRACT 


THE FUNCTION OF THE DQ11 DIAGNOSTICS ARE TO 
VERIFY THAT THE OPTION OPERATES ACCORDING 
TO SPECIFICATIONS. 


or aie THERE ARE SEVEN OFF LINE a THAT ARE 


ING T 
te pay OF ERROR WILL BE IMMEDIATE TO PROBLEM 
NOTE: ADDITIONAL DIAGNOSTICS MAY BE ADDED IN THE FUTURE. 


THE SEVEN DIAGNOSTICS ARE: 

1. CZDQA CREV] BASIS R/w TEST #1 

e. ¢ BASIC R/wW TEST o 

+ BASIC NPR AND INTERUPT TEST 

4. RECEJVER ota bake EXERCISER TEST 
Do MISC. RX AND TX TESTS. PLUS BCC TESTS. 
6. CHARACTER DETECT TESTS. 

7. CZDQH CREV] CHARACTER LENGTH AND INTERRUPT TESTS. 
T 
1. 


‘THERE IS ALSO_AN ONLINE TEST TO BE DISCUSED LATER. 
CZDQO0 CREV] ONLINE TEST. (ITEP OVERLAY) 


A PARAMETER INPUT PROGRAM IS AVAILABLE 


AND A 
1. CZDQG CREV] DQ11 TRIAL PROGRAM (PARAMETER INPUT) 
REQUIREMENTS 


EQUIPMENT 

ANY PDP11 yy CPU (WITH MINIMUM 4K MEMORY)-WITH 
OR WITHOUT A HARDWARE SWITCH REGISTER (LOC. 17757C) 
ae 33 (OR EQUILIVALENT) 

SYNC MODEM (ONLY REQUIRED FOR ONLINE TEST) 

STORAGE 

PROGRAM WILL LOAD AND RUN 

IN 4K OF MEMORY. 

LOCATION 1400 THRU 1600 ARE ESPECIALLY TO 

BE NOTED AND TO BE UNTOUCHED BY CPERATOR 


AFTER DQ11 TRIAL PROGRAM HAS BEEN EXECUTED. 
OR AFTER THE ‘‘AUTO SIZING'' HAS SEEN DONE. 


LOADING PROCEEDURE 
ME THOD 
ALL PROGRAMS ARE IN ABSOLUTE FORMAT AND 
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ARE LOADED USING THE ABSOLUTE LOADER. 
ABSOLUTE LOADER STARTING ADDRESS *500 


LOAD THE ADDRESS OF ABS. LOADER (LOC.XXx500) 
THEN START 


STARTING PROCEEDURE 


A. LOAD LOC. 200 
B. SET SWR TO ZERO FOR "‘AUTO SIZING'' OR LEAVE 
LEAVE SWR BIT 7=1 TO USE EXISTING PARAMETERS SET UP 
BY DQ11 TRIAL PROGRAM OR A PREVIOUSLY RUN DQ11 DIAGNOSTIC 
THAT USED THE ‘AUTO SIZING’. 
****REFER TO SECTION 4.1 FOR SOFTWARE SWITCH REGISTER OPERATION 


Stee 


AND OPTI 
NOTE:THE SOFTWARE SWITCH REGISTER JS LOCATED AT LOC.176 
SOFTWARE DISPLAY REGISTER IS LOCATED AT LOC.174 


C.THEN START 
THE PROGRAM WILL TYPE MAINDEC NAME AND PROGRAM NAME 
IF THIS WAS THE FIRST START UP OF THE PROGRAM) AND ALSO 
THE FOLLOWING: 
"MAP OF DQ11 STATUS'' 
160010 


150310 


THE ABOVE IS ONLY AN EXAMPLE! 

THIS WOULD INDICATE THE STATUS TABLE STARTING AT ADD. 

1400 IN THE PROGRAM. THE STATUS TABLE MUST BE VERIFIED BY THE 
USER IF AUTO SIZING IS DONE. FOR INFORMATION OF STATUS 

TABLE SEE SECTION 8.4 FOR HELP. 


xeeeIF THE SOFTWARE SWITCH REGISTER IS SELECTED ins gh THE FOLLOWING 
WILL BE TYPED AFTER THE PROGRAM IDENTIFIES ITSELF 
SWR=XXXXXX NEW= (REFER TO SECTION 4.1 FOR OPERATOR" S OPTION) **** 
NOTE:IF USING THE SOFTWARE SWITCH REGISTER WHEN A HARDWARE 
ow Aes REGISTER IS AVAILABLE THE PROGRAM WILL NOT 
TYPE OUT THE TITLE. 
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THE PROGRAM WILL TYPE ‘R'' 
AND PROCEED TO RUN THE DIAGNOSTIC 


CONTROL SWITCH SETTINGS 


IF THE DIAGNOSTIC IS RUN ON A CPU WITHOUT A SWITCH 
REGISTER THEN A SOFTWARE SWITCH REGISTER IS USED WHICH ALLOWS 
THE USER THE SAME SWITCH OPTIONS AS THE HARDWARE SWITCH *REGISTER. 
IF THE HARDWARE SWITCH REGISTER DOES NOT EXIST OR IF ONE DOES 

AND IT CONTAINS ALL ONES (177777) THEN THE SOFTWARE SWITCH 
REGISTER (LOC. 176) IS USED. 


CONTROL : 
THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH 
REGISTER (LOC. 176) FROM THE TTY. THIS CAN BE ACCOMPLISHED BY 
DOING THE FOLLOWING: 
1) TYPE CONTROL G <*G>; THIS WILL ALLOW THE TTY TO ENTER DATA INTO 
LOC. 176 AT SELECTED POINTS WITHIN THE PROGRAM. 
THE MACHINE WILL THEN TYPE: _— ee (XXXXXM IS THE OCTAL CONTENTS 
OF THE SOFTWARE SWITCH REGISTER.) 


AFTER THE ""NEW="" HAS -~. TYPED THEN THE OPERATOR CAN DO ONE 
OF THE FOLLOWING AT THE T 


A) TYPE A NUMBER TO BE LOADED INTO LOC. 176 FOLLOWED BY A <CR>. 
( BETWEEN 0-7 WILL BE ACCEPTED AND ONLY 6 NUMBERS 


LOWED) 
IF A <CR> IS THE FIRST KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED. 


IF A CONTROL U <“U> IS DEPRESSED THEN THE PROGRAM WILi. SEND YOU 
BACK TO STEP é. 


: HALT ON ERROR 
: CURRENT TEST 


; AND LOOP ON IT 
: USE PREVIOUS STATUS TABLE. CLR=DO AUTO SIZE. 


: LOCK ON SELECTED TES? 
: RESTART PROGRAM AT SEIECTED TEST 
: RESELECT DQ11°S DESIRED ACTI©. 
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4.1.2 SWITCH REGISTER RESTRICTIONS 


Sw 00 wp re al a oh iets ACTIVE. 
PLEASE NOTE T A MESSAGE IS TYPED 
OUT FOR SWITCH REGISTER BE 


NG THIS 
SWITCH ALTERS THAT LOCATION; THEREFORE 
IF FOUR DQ11S ARE IN THE SYSTEM 
***DQ NOT*** SET SWITCHS GREATER THAN 
Sw 03 IN THE UP POSITION. THIS WOULD BE 
A FATAL ERROR. DO NOT SELECT MORE ACTIVE 
DQ11S THAN HAS Pine GIVEN INFORMATION 
ABOUT IN TRIAL PROGRAM. 
LOAD ADDRESS 200 
START WITH Sw 00=1 
PROGRAM WILL TYPE MESSAGE 
CONTINUE THE BINARY_ NUMBER OF DQ11 , DESIRED ACTIVE 
EXAMPLE: 1=1 DQ11; 3=2 DQ11; 7=3 DQ11; 17=4 DQ11 37=5 DQ11 ETC 
NUMBER (IF VALID) WILL BE IN DATA CTauTs (EXCLUDING 11/05, 11706, 11/34) 
CONTINUE WITH ANY OTHER SWITCH SETTINGS DESIRED. 


IT IS STRONGLY SUGGESTED THAT 
AT LEAST ONE PASS HAS BEEN MADE 
BEFORE TRYING TO SELECT A TEST 
THAT IS NOT IN THE ORDER 4 SEQUENCE 
oy REASON ty: IS THAT T 

PROGRAM HAS TO CLEAR AREAS "AND SET 
UP PARAMETERS. ALSO WHEN A TEST IS 
SELECTED ALWAYS START AT THE VERY 
BEGINNING OF THAT TEST. 


LOOP ON CURRENT DATA: 

THIS SWITCH WILL ONLY _ IF 

CALL *‘SCOP1'’ IS_IN THAT TEST. 

THE REASON BEING THAT MOST TESTS 

DEAL_WITH BLOCKS OF DIFFERENT DATA 

TO BE SENT OR RECEIVED ALL AT ONCE 

THUS IN BLOCK DATA; ONE PATTERN CANN'T BE SINGLEP OUT. 


SWITCH REGISTER PRIORITYS 
ERROR SWITCHES 
1, DELETE PRINT OUT/BELL ON ERROR. 
es DELETE ERROR PRINTOUT. 
° HALT ON THE ERROR. 
4. GOTO BEGINNING OF THE TEST. 
ve. GOTO NEXT TEST ON ERROR, 
****HLT (ERROR) ROUTINE SUPPORTS <*G> OPERATION**** 


SCOPE SWITCHES 
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Sw 09 (IF ENABLED BY ‘‘SCOP1"’), 

Sw 14 

Sw 11 

s***SCOPE ROUTINE WILL SUPPORT <*G> OPERATION**** 
STARTING ADDRESS 


STARTING ADDRESS IS AT 000200 
THERE ARE NO OTHER STARTING ADDRESSES 
FOR THE D@11 DIAGNOSTICS PREVIOUSLY MENTIONED 


NOTE: IF ADDRESS 000042 IS NON-ZERO 
THE PROGRAM ASSUMES IT IS UNDER 
ACT11 OR DDP CONTROL AND WILL ACT ACCORDINGLY 
AFTER *ALL* AVAILABLE DQ17'S ARE TESTED 
THE PROGRAM WILL RETURN TO ‘DDP2"' OR ‘‘ACT=11"". 


OPERATING PROCEDURE 


WHEN PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN SECTION 
FOUR WILL BE PRINTED. 


AND PROGRAM WILL BEGIN RUNNING THE 
DIAGNOSTIC 


PROGRAM AND/OR OPERATOR ACTION 
THE TYPICAL APPROACH SHOULD BE 


HALT ON ERROR (VIA SW 15=1) 

WHEN EVER AN ERROR OCCURS 

CLEAR Sw 15 

SET Sw 14: (LOOP ON THIS TEST) 

SET SW 13: (INHIBIT ERROR PRINT QUT) 


“THE TEST NUMBER AND PC WILL BE TYPED OUT AND 
POSSIBILY AN ERROR MESSAGE (THIS DEPENDS ON THE TEST) 
TO GIVE THE OPERATOR AN IDEA AS TO THE SOURCE OF THE 
PROBLEM. IF IT IS NECESSARY TO KNOW MORE INFORMATION 
CONCERNING THE ERROR REPORT; LOOK IN THE LISTING 
FOR THAT TEST NUMBER WHICH WAS TYPED OUT 
AND THEN NOTE THE PC OF THE ERROR REPORT 
THIS WAY THE EXACT FUNCTIONING OF THE TEST 
CAN BE INTERPEDITED 


ERRORS 


S_ DESCRIBED PREVIOUSLY THERE WILL ALWAY Bi 
TEST NUMBER AND PC TYPED OUT AT THE TIME OF AN 
ERROR (PROVIDING SW 13=0 AND SW 12=0). IN MOST CASES ADDITIONAL 
INFORMATION WILL BE SUPPLIED THE THE ERROR MESSAGE 
ak IS TO GIVE THE OPERATOR AN INDICATION OF THE 


FRROR RECOVERY 


1. 
ee 
3 
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IF FOR SOME REASON THE DQ11 SHOULD 

pa CONTROL OF BUS SO T 

UNCTIONS ARE INHIBITED) rh INIT 

OR POWER DOWN UP IS NECESSARY FOR OPERA 
TO REGAIN CONTROL OF 
IF THIS SHOULD HAPPEN; LOOK IN LOCATION 
"“"TSTNO'’ (ADDRESS 12363FOR THE NUMBER OF THE TEST THAT 
— AT THE TIME OF THE CATASTROPHIC 


IN THIS WAY THE OPERATOR WILL HAVE AN IDEA AS TO 
WHAT THE DQ11 WAS DOING AT THE TIME OF THE ERROR. 


****HALT RECOVERY WHEN USING SOFTWARE SWITCH REGISTER*®: ** 


IF THE SOFTWARE SWITCH REGISTER IS TO BE CHANGED AFTER A HALT 

THE THE OPERATOR IS ed RED TO TYPE A <*G> BEFORE DEPRESSING CONTINUE. 
THE FOLLOWING WILL BE TYPED: 

SWR=XXXXXX NEW= (REFER TO SECTION 4.1 FOR OPERATOR OPTION) 


RESTRICTIONS 

STARTING RESTRICTIONS 
SEE SECTION 4. (PLEASE) 
OPERATING RESTRICTIONS 


DQ11_ TRIAL PROGRAM MUST BE RUN PRIOR TO THE 

FIRST AND ONLY THE FIRST oa Teoe 4 ANY DQ17 DIAGNOSTIC 
NOTE: IF NO PROGRAM OTHER T 

DQ11 DIAGNOSTIC WAS LOADED AFTER D011 TRIAL OR 

IF CORE MEMORY HAS NOT BEEN CHANGED;OR IF THERE 

1S NO DQ11 CONFIGURATION CHANGES; THE 

DQ11 TRIAL PROGRAM NEED NEVER BE RUN AGAIN 

HOWEVER IF ANY OF THE ABOVE HAVE BEEN VIOLATED 

THE DQ11 TRIAL PROGRAM MUST BE RUN AGAIN 

BEFORE RUNNING THE DIAGNOSTICS 

NOTE: AN ALTERNATIVE TO THE ABOVE IS ATTEMPTING 
i picine WHEN PROGRAM IS INITIALLY STARTED 
W = . 


MISCELLANEOUS 
EXECUTION TIME 
PASS COMPLETE 
WHEN THE DIAGNOSTIC HAS COMPLETED. 
A PASS THE FOLLOWING IS AN EXAMPLE 
OF THE PRINT OUT TO BE EXPECTED. 
END PASS AC~8635D-MC CSR: 160000 VEC: 300 PASSES: 000001 ERRORS: 900000 


NOTE: THE NUMBERS FOR CSR AND VEC ARE 
NOT NECESSARILY THE VALUES FOR THE DEVICE 
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THEY ARE ONLY FOR THIS EXAMPLE. 
8.5 , sti (MINI MONITOR) 


THE VERY FIRST ‘TEST’ (TST1) 

IS *NOT* A TEST OF THE DQ11 HARDWARE 

IT IS A_MINI-MONITOR USED TO CYCLE DQ11 IN THE 
SYSTEM THROUGH THE DIAGNOSTIC. 


KEY LOCATIONS 


RETURN (1214) CONTAINS THE ADDRESS WHERE PROGRAM WILL 
RETURN WHEN ITERATION COUNT IS REACHED 
OR IF LOOP ON TEST IS ASSERTED. 

NEXT (1216) CONTAINS THE ADDRESS OF THE NEXT TEST 
TO BE PEFORMED. 

TSTNO (1226) CONTAINS THE NUMBER OF THE TEST NOW 
BEING PEFORMED. 

RUN (1304) THE BIT IN ‘RUN’ ALWAYS POINTS ONE 
PAST THE DQ11 CURRENTLY BEING TESTED. 


EXAMPLE : 
(RUN) int doth te te it 
MEANS THAT D NO.05 IS THE DQ11 NOW 
RUNNING. 

DQCROO-DQCR17 

DQSTOO-DQST17 

(1400)-(1476) 
THESE LOCATIONS CONTAIN THE INFORMATION 
NEEDED TO TEST UP TO 16 (DECIMAL) DQ11S 
SEQUENTIALY. THEY CONTAIN THE CSR,VECTOR 
AND STATUS CONCERNING THE CONFIGURATION 
OF EACH DQ11. 

DQACTV (1500) EACH BIT SET IN THIS LOCATION INDICATES 
jg Png ASSOCIATED DQ11 WILL BE TESTED 


EXAMPLE : 

(DQACTV) 1500/0000000000011111 
MEANS THAT DQ11 NO. 00,01,02,03,04 
WILL BE TESTED. 


EXAMPLE : 

(DQACTV) 1500/0000000000010001 
MEANS THAT DQ11 NO. 00,04 
WILL BE TESTED. 

DQCSR (1506) apt THE RECEIVER CSR OF THE 
CURRENT DQ11 UNDER TEST 

DQSTAT (1510) CONTAINS THE STATUS OF THE CURRENT 
oor UNDER TEST. 
Ej TWO SYNC CHARS/ONE SYNC CHAR 

TEST JUMPER INSTALLED/NOT INSTALLED 

+ rin INSTALLED/NOT ede 


LLED 
1 NONSYNC/AC TIVE AFTER NO. OF SYNC 
AB OPTION INSTALLED ZNOT INSTALLED 
ODD VRC/EVEN VRC 
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BIT 00-08 VECTOR ‘'A'' OF DEVICE 
8.5 *** METHOD OF AUTO SIZING *** 
8.5.1 FINDING THE CONTROL STATUS REGISTER. 


WHEN LOOKING FOR THE CSR Ue NECESSARY TO TAKE CARE 
THAT WHEN A CSR iS FOUND THAT IT IS INDEED A DQ11. THAT 
IS THE METHOD OF MY MADNESS. FOR THIS ROUTINE. 
AN ATTEMPT TO CLEAR THE MISC. REGISTER IS TRIED 
F A TIME~OUT TRAP OCCURES Wiis hat ARE UPDATED : 
. NO TIME-OUT; THE RECEIVER ‘ACTIVE BIT"’ (BIT 12) 
IS SET AND A *COMPARE* FOR BOTH SYNC1 AND SYNC 2 IS DONE 
AT THE MISC. REGISTER. IF THEY ARE THERE THIS IS 
A DQ11. THE INFORMATION IS STORED AWAY. 


ONE SYNC BIT OR TWO? 


SINCE TOO MUCH HARDWARE MUST BE TURNED ON TO SENSE THE 
PRESENTS OF ONE SYNC OR TWO. THE PROGRAM ASSUMES TWO SYN 

CHARS. NOTE: THIS ASSUMPTION MAY BE ALTERED AFTER AUTO SIZING 
BY ALTERING BIT 15 IN APPRIOATE DQSTXX: LOCATION. 


"'BB"' OPTION INSTALLED? 


TO SENSE FOR THE ‘BB'' OPTION THE PROGRAM SELECTS THE 
CHARACTER DET. REGISTER AND THE LOADS IN ALL 1°S; IF 
ANY ONE OR COMBINATION OF BITS ARE SET THE BB OPTION 
IS ASSUMED TO EXIST. 


""AB"’ OPTION INSTALLED? 


TO SENSE FOR THE ‘‘AB’* OPTION THE PROGRAM SELECTS THE 
POLYNOMIAL REGISTER AND WRITES ALL 1°S INTO IT; IF ANY 
oF atcecmatad te OF BITS ARE SET THE AB OPTION IS ASSUMED 


"BA’’ OPTION INSTALLED? , 


TO SENSE FOR 'BA'' OPTION REQUEST TO SEND AND DATA TERMINAL 
READY ARE SET; IF EITHER ONE OR BOTH ARE SET THE PROGRAM 
ASSUMES THE BA OPTION EXISTES 


JUMPER ON END OF CABLE? ***NOTE:CZDQE ONLY*** 


THE PROGRAM CHECKS TO SEE IF EITHER OR BOTH CLEAR TO 
SEND AND CARRIER ARE SET; IF SO THE PROGRAM ASSUMES THE 
TEST JUMPER IS ON THE END OF THE CABLE. 


ACTIVE ON FIRST NON-SYNC? 


SINCE TOO MUCH HARDWARE MUST BE TURNED ON TO SENSE FOR 
— THE DQ11 GOES ACTIVE a¢ PROGRAM ASSUMES ‘ACTIVE 

ON FIRST NON~SYNC'', NOTE: THIS CAN BE CHANGED BY ALTERING 
BIT 11 IN THE APPRIOATE DGSTXX: AFTER AUTC SIZING 
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8.5.8 SET FOR ODD OR EVEN PARITY? 


AS ABOVE TOO MUCH HARDWARE IS NEED TO SENSE WHICH PARITY 
WAS a Ae F SO THE PROGRAM ASSEMES ODD PARITY. 

NOTE: THIS CAN BE CHANGED BY ALTERING BIT 9 IN APPRIO- 
ATE DQSTXX: LOCATION. AFTER AUTO SIZING 


FINDING THE VECTOR. 


THE PROGRAM SETS “PRIMARY DONE"',"'SECONDAY DONE"’, ote ""INTERUPT ENABLE"’ 
24 IT INTERUPTS IT IS PICKED 


HI] 
OF THE DIAGNOSTICS AND *AUTO SIZING* SHOULD BE REDONE 10 
GET THE CORRECT VECTOR. 


PROGRAM DESCRIPTION 
CONTAINED WITHIN LISTING 
LISTING 

FOLLOWING 





eta y 


L 7 
CZDQH MACY11 30A(1052) A a 78 08:41 PAGE 12 SEQ 0011, 
CZDQHD. ey spill 8 07:59 INTRODUCTION TO DQ11 DIAGNOSCTIC : - 7 


; CZDQHDO/<377>/CHAR L_& INT 
:COPYRIGHT 1975, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 


‘Jotaumecal™ ap dA | BY R. BLA r 
: UPPORTS SOF TWARE SWITCH REGISTER 
; 8) SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE sui TCH REGISTER 


BY <*G>. ty 
spiny “PROCEDURE % 


0 } 

‘LOAD ADDRESS 000200 4 

;PRESS START “, 

;PROGRAM WILL rye "'CZDQHD0/<377>/CHAR L_& INTR‘' 2 

[PROGRAM WILL TYPE ‘'R'' TO INDICATE THAT TESTING HAS STARTED 
‘AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMRLETE MESSAGE 
‘AND THEN RESUME TESTING 


<4, 
SWITCH REGISTER cfiene 


SW15=100000 =1,HALT ON ERROR 
LOOP ON CURRENT TEST 
- INHIBIT ERROR TYPEOUT 
-DELETE TYPEOUT/BELL ON ERROR. 
- INHIBIT ITERATIONS 
ESCAPE TO NEXT iy @ ON ERROR 
LOOP WITH CURRENT DATA 
LOOP ON ERROR 


. 
. 


;LOCK ON TEST SELECT 

RESTART PROGRAM AT SELECTED TEST 
;RESELECT DQ1] DESIRED ACTIVE 

;NOTE: THIS MUST NOT EXCEED ORIGINAL COUNT 
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558 
REGISTER DEFINITIONS 


GENERAL REGISTER 
:GENERAL REGISTER 
:GENERAL REGISTER 
GENERAL REGISTER 
:GENERAL REGISTER 
: GENERAL REGISTER 
PROCESSOR STACK POINTER 
COUNTER 


;LOCATION EQUIVALENCIES 


DSWR= 177570 =; HARDWARE SWITCH REGISTER LOC. 
DLIGHTS=177570 :HARDWARE entre REGISTER LOC. 
PS=177776 PROCESSOR STATUS WORD 
STACK=1200 ;START OF PROCESSOR STACK 


: INSTRUCTION DEFINITIONS 


PUSH1 SP= 5746 ;DECREMENT PROCESSOR STACK 1 WORD 
: SAVE. RO ON ae STACK 1 WORD 

;RESTORE RO FROM STACK 

SDECREMENT STACK a 

: INCREMENT STACK TWICE 

BASIC DEFINITION OF ERROR CALL 


IT4=2 
3=1 
2=4 
1=2 
O=1 


3DQ11 OPTIONAL DEFINITIONS 
ABBIT=2000 


JUMBIT=40000 
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001000 ODDB1T=1000 
100000 SYNBIT=100000 


3DQ11 SECONDARY REGISTER DEF INATIONS 


RECEIVER BUS ADDRESS PRIMARY. 
;RECEIVER WORD COUNT PRIMARY. 

; TRANSMITTER BUS ADDRESS PRIMARY. 

; TRANSMITTER BUS ADDRESS PRIMARY. 
RECEIVER BUS ADDRESS SECONDARY. 
RECEIVER WORD COUNT SECONDARY. 

; TRANSMITTER BUS ADDRESS SECONDARY. 
TRANSMITTER WORD COUNT SECONDARY. 


; CHARACTER DETECT REGISTER. 

oars REGISTER 
MISCELLANEOUS REGISTER. 

; TRANSMITTER MUX REGISTER. 
SEQUENCE REGISTER. 
RECEIVER BCC REGIS:ER. 

; TRANSMITTER BCC REGISTER. 
POLYNOMIAL REGISTER. 


-—NAH- SF NOUMEWN HO 


000010 
000011 


oro eee eee & @ 
is NnHMWVVIVVD 
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; TRAPCATCAER FOR ILLEGAL INTERRUPTS 
; STANDARD INTERRUPT VECTORS 


-PFAIL POWER FAIL HANDLER 
340 SERVICE AT LEVEL 7 
eHLT ERROR HANDLER 
ZSERVICE AT LEVEL 7 
. TRPSRV [GENERAL HANDLER DISPATCH SERVICE 
340 SERVICE AT LEVEL 7 


LOGICAL ACT HOOKS 


-=46 
-=52 


-WORD 0 
7 THIS ROUTINE TRIES TO FORCE THE RECEIVER TO INTERUPT 
;TO ITS VECTOR WHERE IT WILL PICK UP THE STATUS LOCATION 
:FOR ITS NEW PC; AND PICK UP AN IOT INSTRUCTION FOR ITS 
NEW PS. WHEN THE NEW PC IS FETCHED AN ig a AE ON_IS 
;EXECUTED, TRAPPING TO LOCATION 20 WHERE OUTINE IS EXECUTED 
56 : ~~ THE PC FROM THE STACK AND US iT as” THE VECTOR ADDRESS 


VE CMAP: 
016120 1$: MO R1,(RO)+ Seiya FILLING THE VECTOR AREA 
#4,(R1)+ -+2; IOT (4) 
(RO) +,(R1)+ UPDATE THE POINTERS 
R1,41000 :IS ALL FLOATING VECTOR AREA DONE 
1$ ‘BR IF NOT ALL DONE 
sSET FOR IOT TRAP 8Y DQ11 


000020 #4$ ,a4#20 
001244 DQACTV, TEMP1 GET THE ACTIVE DQ11 §$ 
2$: TEMP 1 ARE YOU w Yt Se DQ11 
5$ :1F CARRY CLEAR.. NO MORE DQ11S 
177776 PS [CLEAR PS 
(R2)+ :PUT POINTER TO STATUS TABLE 
000340 177776 -+ aaecalatteas ;DELAY. SET PRI/SEC DONE AND IE 


“e DELAY 
000300 MOVB #300, (Re) NO INTERUPT ASSUME 300 FIX IN TEST C 
: (R2)+ “UPDATE POINTERS 
2$ :GO_ DO IT AGAIN 
: (SP), (R2) ZENTERD BY IOT TRAP BY DQ11 
000007 #7,(R2) [CLEAR UNWANTED BITS 
MP (SP)+, (SP)+ POP IOT JUNK OFF STACK 
#3$,(SP) SET RETURN PC ON STACK 
:GG HOME. 
5$: PC ALL SIZING IS DONE 
2 * patheataes SWITCH REGISTER**** 


DISPREG: 0 :SOFTWARE DISPLAY REGISTER 
SWREG: 0 SSOFTWARE SWITCH REGISTER 


PROGRAM START 
.=200 


SEQ 0014 
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001512 JMP - START :GO TO START OF PROGRAM 


.=220 
CSRMAP : #1400,R2 CLEAR ALL STATUS TABLE 
C d+ ;D0 CLEAR 


(R2 D0 
nie, R2 TALL TABLE DONE 

‘BR IF MORE TO GO 

:SET NUMBER OF DQ11S TO 0 

“SET TABLE POINTER 

#160060. R1 GET FIRST FLOATING ADDRESS 
5S, [SET FOR TIME OUT TRAP=-NO DEVICE-- 
#12 a1) :TRY AND SEL MISC REGISTER 
6(Ri) : TRY MISC REG 
#10000, (R1) 
#30000.6(R1) : OR SYN YNC 2 
2$ :THIS IS NOT A DQ11 IF I BRANCH 
R1, <R2)+ :NO! THIS IS A DQ11 --STORE CSR 
#SYNBIT, (R2) CHARS 
(R1) 
#10,5(R1) 


ET REG 
sWAS THE REGISTER WRITTEN? 
ZAPPERENTLY NO 8B OPTION. 

f OPTION 


+6 

#ABBIT, (R2) 
#1400, 2(R1) 
#1400, *2(R1) 


704 
70 

706 
707 
708 
709 
710 
711 
712 
713 
714 
715 
716 
717 
718 
719 
720 
72 

72 

72 


Wr 


iBABIT, (R2) 
#30000; *2(R1) 


#JUMBIT, (R2) 
#ACTBIT, (R2) 
#ODDBIT. (R2) 
(R2)+ 


:UPDA 
#10,R1 ‘UPDATE CSR POINTER BY Y 10 (8) 
aaa i SHAVE ALL FLOATING ADDRESSES BEEN CHECKED?? 


;BR IF NOT ALL DONE 
DQACTV ;ZERO ACTIVE DQ11S 
DQNUM WERE ANY DQ11S FOUND 
4$ HEY BUDDY. NO DQ11S FOUND IN SYSTEM 
DOQNUM ,R 1 SAVE NUMBER OF DQ11S 
R1, SAVNUM ; SAVE wr FOR ACT11 
Dercty CLEAR § ACTIVE ADDRESS 
we * 
DOQACTY SET "BIT 
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R1 DEC NUMBER OF DQ11S 
;BR_IF MORE TO GO 
RESET re VECTOR 


3$ 
46,044 
DQACTV, SAVACT 
#340, a4%22 
#1400" R2 


#300,R0 
#302,R1 
VE CMAP 


S 
neu 
aS FT 
Noo 


jelelelelele) S 
pro per pe p= = ps 


AGE 
31 DIDN'T FIND ANY DQ11S. DON'T USE AUTO SIZE. 


; I TEST NO DQ11S 
BR .-2 ‘DON'T LET OPR HIT CONT. SW 
000466 5$: . ZENTERED BY TIME OUT TRAP 


RO 


-=1000 
fabs 050504 MTITLE: .ASCiZ <377><12>/CZDQHDO/<377>/CHAR L & INTR /<377> 
04 


052116 020122 


INDIRECT POINTERS 


fae ta: SWITCH REGISTER POINTER 
DISPLAY REGISTER POINTER 
: TELETYPE KEYBOARD CONTROL rs} eae 
TELETYPE KEYBOARD DATA BUFFER 
/ ;TELEPRINTER CONTROL REGISTER 
177566 :TELEPRINTER DATA BUFFER 


sPROGRAM CONTROL PARAMETERS 


SCOPE ADDRESS FOR LOOP ON TEST 

ADDRESS OF NEXT TEST TO BE a a 

sADDRESS FOR LOCK ON CURRENT DAT 

:NUMBER OF ITERATIONS THAT CURRENT TEST WILL BE EXECUTED 


DBOOOOWOOO 


: TOTAL OF ER 
[PC OF LAST ERROR CALL 
PROGRAM VARIABLES 


3 TEMPORARY STORAGE 
; TEMPORARY STORAGE 
; TEMPORARY STORAGE 
3 TEMPORARY STORAGE 
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: TEMPORARY STORAGE 
;RO STORAGE 


;R5 STORAGE 
SSTACK POINTER STORAGE 
[PROGRAM COUNTER STORAGE 
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PROGRAM CONTROL FLAGS 


ke ; PROGRAM rie FLAG 
T TEST START FLA ° 
SERROR OCCURED FLAG 
LOCK ON CURRENT TEST FLAG 


DEFINITIONS FOR TRAP SUBROUTINE CALLS 
;POINTERS TO SUBROUTINES CAN BE FOUND 
SIN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


PPP e Pirie iit list iti iit itt tisttitit titi titi ttt 
PPP rrr iii tit titi titi tt iti iti ttt titi ttt t ity 
“ TRPTAB: 

SCOPE=TRAP+0 ;CALL TO SCOPE LOOP AND ITERATION HANDLER 


SCOP1=TRABS CALL TO LOOP ON CURRENT DATA HANDLER 
intateee sCALL TO TELETYPE OUTPUT ROUTINE 
oe :CALL TO ASCII STRING INPUT ROUTINE 
maw ;CALL TO INPUT ERROR HANDLER 

PARAM=TRAP+5 7 CALL NUMERICAL DATA INPUT ROUTINE 
SAVOS=TRAP SG 7 CALL REGISTER SAVE ROUTINE 
RESO5=TRAP+7 7 CALL REGISTER RESTORE ROUTINE 

CONVRT= rape’) 7 CALL DATA OUTPUT ROUTINE 

CNVRT=TRAP+11 7 CALL DATA OUTPUT ROUNTINE WITHOUT CR/LF. 
mSTCLR= TRAE 7 CALL ISSUE MASTER CLEAR 

netescgeiag tls 7 CALL CLEAR ALL SCRATCH PAD MEMORIES 
I 7 CALL ALLOW SWREG TO BE LOADED FROM TTY 


CNTLU=TRAP+15 ? CALL ALLOW LOADING OF SWREG FROM TTY 
016374 -CNTLU 


SRE RE RE RRE RARER EE EAE EEE REE EE 
FERRER ERA AAR ERROR EEE AREER EERE EKER RK ERE EERE REREAD 


:DQ11 VECTOR AND REGISTER INDIRECT POINTERS 
001350 DORVEC: :POINTER TO DQ11 RECEIVER INTERRUPT VECTOR 


TOR 
TRANSMITTER rae SERVICE PS 
: RECEIVER CONTROL REGISTER 

SPOINTER TO HIGH BYTE OF DQ11 RECEIVER CONTROL REGISTER 
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DQTCSR: sPOINTER TO DQ11 TRANSMITTER CONTROL REGISTER 
DQERR: ;POINTER TO DQ11 ERROR REGISTER 

DQREG: :POINTER TO HIGH BYTE OF ERROR REGISTER 

DQSEC: ;POINTER TO DQ11 SECONDARY REGISTER 

DQSECH: :POINTER TO HIGH BYTE OF DQ11 SECONDARY REGISTER 


felelelela) 


:DQ11 STATUS TABLE AND ADDRESS ASSIGNMENTS 


= CONTROL STATUS REGISTER FOR DEVICE NO: 00 
;VECTOR AND CONFIGURATION STATUS FOR DEVICE 
; CONTROL STATUS REGISTER FOR DEVICE NO: 01 
VECTOR AND CONFIGURATION STATUS FOR DEVICE 
:CONTROL STATUS REGISTER FOR DEVICE NO: 02 
:VECTOR AND CONFIGURATION STATUS FOR DEVICE 
; CONTROL STATUS REGISTER FOR DEVICE NO: 03 
;VECTOR AND CONFIGURATION STATUS FOR DEVICE 
; CONTROL STATUS REGISTER FOR DEVICE NO: 04 
;VECTOR AND CONF IGURATI TATUS FOR DEVICE 
; CONTROL STATUS REGISTER FOR DEVICE NO: 05 
;VECTOR AND CONFIGURATION STATUS FOR DEVICE 
; CONTROL STATUS REGISTER ef DEVICE NO: 06 
;VECTOR AND CONFIGURATION STATUS FOR DEVICE 
; CONTROL STATUS REGISTER FOR DEVICE NO: 07 
;VECTOR AND CONFIGURATION STATUS FOR DEVICE 
:CONTROL STATUS REGISTER FOR DEVICE NO: 10 
VECTOR AND CONFIGURATION STATUS FOR DEVICE 
= CONTROL STATUS REGISTER FOR DEVICE NO: 11 
VECTOR AND CONFIGURATION STATUS FOR DEVICE 
3 CONTROL STATUS REGISTER FOR DEVICE NO: 12 
VECTOR AND CONFIGURATION STATUS FOR DEVICE 
; CONTROL STATUS REGISTER ec DEVICE NO: 13 
VECTOR AND CONFIGURATION STATUS FOR DEVICE 
3 CONTROL STATUS REGISTER FOR DEVICE NO: 14 
VECTOR AND CONFIGURATION STATUS FOR DEVICE 
:CONTROL STATUS REGISTER FOR DEVICE NO: 15 
:VECTOR AND CONFIGURATION STATUS FOR DEVICE 
= CONTROL STATUS REGISTER FOR DEVICE NO: 16 
;VECTOR AND CONFIGURATION STATUS FOR pevile 
;CONTROL STATUS REGISTER FOR DEVICE NO: 
VECTOR AND CONFIGURATION STATUS FOR DEVICE 
‘eae ACTIVE BITS FOR TESTING 

AVE NUMBER OF merive DQ11S 

CTAL NUMBER OF TOTAL Dt OD DQi1S 
CSR OF DQi1 UNDER TEST 
;VECTOR AND CONFIGURATION STATUS OF DQ11 UNDER TEST 


; PROGRAM gy A a 


$8555 5555558558 S 


; 
: 
: 
, 
: 
1 
) 
. 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


DOQSTAT: . 


T OR 
“CLEAR PROGRAM CONTROL FLAGS AND COUNTS 
: TYPE TITLE MESSAGE 





CZDQH MACY11 30A(1052) 
8 07: 


CZ2DQHD.P11 


09-JUN=7 
012737 
0127 


RSxSesES 


o- 

2 
Vn 
SYS 


8 


177776 


000024 
001276 


061300 
001226 
001214 
001200 
001202 


000004 
177326 


001200 
001202 


001200 
177232 
000220 
017050 


001400 001244 
177252 


001246 


000002 
000001 


001244 
177160 


177140 001502 


H 2 
PROGRAM INITIALIZATION AND START UP. 


#340,PS 
STACK, SP 
#.PFAIL ,a#24 
DQNUM , SAVNUM 
STFLG 

PASCNT 
ERRFLG 


RUNF LG 
#1400, CREAM 
ERRCNT 
LSTERR 


#1,TSTNO 
#. START ,RETURN 


aw 08:41 PAGE 21 


«START: MOV 
MOV 


WR, SWR 
mDLIGATS, LIGHTS 
6,-(SP) 


aye. =(SP) 
#64$, a4 
#-1,aSWR 
65$ 


BR 66$ 
645: (SP)+, (SP)+ 
65$: AHSWREG , SWR 
A#DISPREG,LIGHTS 
66$: (SP) +, a44 
(SP) +, a6 
are 


;LOCK OUT INTERRUPTS 
SET UP STACK 
SET UP POWER FAIL VECTOR 


:CLEAR START FLAG 
CLEAR PASS COUNT 
CLEAR ERROR FLAG 


:CLEAR ERROR COUNT 

CLEAR LAST ore POINTER 
:SET UP oo TEST 1 

7SET UP FOR POWER FAIL BEFORE 
: TESTING STARTS 

[MOV HARDWARE SWR TO SWR 

MOV DISPLAY ens TO LIGHTS 
:SAVE VECTOR 


SET UP FOR TIMEOUT 
;REFERENCE HARDWARE SWITCH REGISTER 


sADJUST STACK 

sPOINT TO SOFTWARE SWITCH REG 
:POINT TO SOFT DISPLAY REG 
RESTORE VECTORS 


UNDER MONITOR 


BNE 67$ 
intend" NEXT 4 ae OF CODE MOVED TO SOLVE PRA2757 (JUNE 78) *sxnex 
TSTB INIF HAS INITIALIZATION BEEN PERFORMED? 


SIF YES, BR 

:TYPE TITLE MESSAGE 
;IF NOT SET FLAG AND INIT 
31S SWREG USED 


AHSWREG, SWR 
67$ 


aSWR 

- +6 

PC ,CSRMAP 
XHEAD 


#1400, TEMP1 
aTEMP) , TEMP2 
.+16 


#2 a 
#SW00, aSwR 
1$ 


RO 


aSwk,SAVACT 


SEQ 0020 





is 
CZDQH ms apd” O7-JUL=78 08: = PAGE 22 SEQ 0021 
CZDQHD.P11 09-JUN=78 07:59 PROGRAM INITIALIZATION AND START UP. 


BLOS 11$ 
TYPE 


72 
177120 001500 : @SWR ,DQACTV 
001500 DQACTV,RO 


900300 
000302 
(RO) +, (R1)+ 
001000 #1000,R0 
eft 
;TEST START AND RESTART 
7776 « : #340,PS ;LOCK OUT INTERRUPTS 
MO HSTACK, SP SET UP STACK 
ta :1S PROGRAM UNDER MONITOR CONTROL 


sCHECK FOR <*G> 
177032 7 eaamene CHECK FOR LOCK ON TEST 


SERESPEREE SEI IELESES 


014504 
014506 * SET UP TO LOCK 


014602 014504 : 
014604 014506 MOV BRX-TTST+#2 ;LOCK NOT SELECTED, SET UP FOR NORMAL SCOPE LOOP 
000002 176764 : #su01, aSwR :1F SWO1=1, GET STARTING PC 


MN 2 3232343554554 


jelejolelolelelelelolelele) 
WROD ONAUSWM—O 


Mr 


1 
1 
1 
1 
1 
1 
4 
; 
1 
1 
1 
1 
7 
1 
1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


Stole! 
ine) 
ox 


BR 4$ 
3¢: MO #TST1,RETURN fad AT TEST 1 
4$: —E R 


-MR 

176740 — ot @RE TURN : START TESTING 
PITTI IITITITILTTTTTITITITTTTTTTITTTTTT TTT tert 

000001 TST1: #1,TSTNO 
002644 MO #TsT2, RETURN 
002644 MOV TST2,NEXT 
001302 FLG ; IS MY FIRST TIME HERE? 

1$ : } FLAG IS SET 
000001 UN POINTER 
000020 19 NT : OR nk OF 16 DQ11°S PER SYSTEM 
C01 302 RUNF LG ; AG 


Sages ep ye 
o--— o--.-,-— 
WINING = MIMONMONY 
—-NNONNNN 
WINN 2 AWNWG 
NNNONNNN 
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033737 001304 001500 1$: RUN, DQACTV 7FIND AN oy Mo og DQ11 TO TEST. 
1032 3$ BR IF I FOUND ONE 


TO TEST. 
901500 DOACTV ‘FIND OUT IF THERE ARE 0 DQ11 ACTIVE. 
2$ 7BR TO FATAL ERROR. WHY AM I HERE IF NO ACTIVE DQ11'S??? 
* CLEAR ALL THE CONDITION CODES OF CPU 
001304 RUN [UPDATE RUN POINTE 
000004 001300 #4, CREAM S UPDATE ADDRESS POINTER. 
001306 DE RUNCNT [DEC NUMBER OF TIMES I LOOKED AT ACTIVE. 
BN 1$ [BR AND KEEP LOOKING. 
000020 001306 #16. ,RUNCNT :START RESTORING MY POINTERS. 
001400 #1400, CREAM SRESTORE ADDRESS POINTER 
000001 MO Ht RUN “REST R TPOINTER. 


NG 
ZALLERT OPERATOR 4 san” ERROR 
:NO DQ11 ACTIVE. WHY AM I HERE??? 
;YOU MUST RELOAD Dal DIAGNOSTIC!! 

2 >STICK HERE ON CONT. 

“CLEAR CPU COND. CODES 

:UPDATE RUN. ACTIVE DQ11 FOUND. 
aCREAN,DOCSR :PLACE ADDRESSS OF ht AT DQCSR 


acREAM DQSTAT 
REAM 

DacSR. DORCSR 

DOQSTAT,DQRVEC 

#177007, DORVEC 

DORVEC DORLVL ;GENERATE ADDRESS OF RECEIVER INTERRUPT SERVICE PS 

DORLVL barvec ;GENERATE ADDRESS OF TRANSMITTER INTERRUPT VECTOR 

DOTVEC DOTLVL ZGENERATE ADDRESS OF TRANSMITTER INTERRUPT SERVICE PS 

DORCSR. DORCSH 

DORCSH :GENERATE ADDRESS OF HIGH BYTE 

DORCSR DOTCSR ZGENERATE ADDRESS OF TRANSMITTER CONTROL REGISTER 

DOFCSR.D ,DQERR =; GENERATE ADDRESS OF ERROR REGISTER 

DOERR, DORE. ;GENERATE ADDRESS OF HIGH BYTE OF ERROR REGISTER 

DOREG , DASE C ZGENERATE ADDRESS OF SECONDARY REGISTER 


DQSEC 
DOSEC ,DQSECH GENERATE ADDRESS HIGH BYTE 
DQSECH 


& 

Ww 
So 
So 


[UPDATE ADDRESS POINTER 


; 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 


SS888S88s388 
pre i Pe i 
WIWWIWWANWWNWWUIW 
PRON 


~ — J J Ls 
eleolele) 
aod 

. NOU 


REREES 


:DQ11 HELL 
EST W 
a3 


ISER!!! 
WILL EXERCISE: 
IVER AND TRANSMITTER INTERUPTS 
T AND EXIT T (IF AB OPTION INSTALLED) 


VRC 
;THE CA3LE AND TURN AROUND (DATA ONLY) 
: CHARACTER TRANSFERS. 


SESPIESSSESRESE 


8 
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PROGRAM INITIALIZATION AND START UP. 
» Ven € 


5 I eR I TOI TT TTT TT Ke 
900002 TST2: 
002734 
000036 30.1 
003756 00121 MOV #TST3,NEXT 
: SYNC CHARACTERS. 


; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


OW NAAR LE SRIEAEAVN AS BYBVSGRAV VS SHOVRARWVASSRIKRARALS 


ert at! tee a hat Da te a ST 


100000 oe 2 ONE 7 CHAR OR TWO? 


000377 
013656 


000026 
013026 
014302 


000017 
123456 


013054 
000177 


013662 


176374 
176362 
176350 
176336 
176324 
176312 
176300 
176270 
176264 
176252 
001510 
176234 


176224 
176220 


176136 


#377 ,SYNC 
XSYNC 


#26,SYNC 
#13026, XSYNC 


aDQR 

#-200 ,aDQsec 
ASYNC ,@DQSEC 
#~202 ,aLasec 
@DOQREG 
AXRXBUF , ADQSEC 
@DQREG 

#~200, @DQSEC 
@DQREG 
#XTXBUF , ADQSEC 
@DQREG 

#~200 ,aDQSEC 
#11, a@DQREG 

. SYNC ,@DQSEC 
@DQREG 


#104000 , @DQSEC 
va T ,DQSTAT 
+ 


#B1T3, aDOQSEC 
#17, aDOREG 
#123456, aDQSEC 
#TXBF ARO 
#177,R3 
R3,(RO)+ 

R3 

1$ 

#XTXBUF , RO 

R + 


R3,(RO)+ ‘ 
R3 


23 7 
#RX ISR, @DORVE C 


:BR_IF Two 
:SET ONE SYNC. 
+: laa SET TO ONE. 


sLOAD FOR TWO SYNC 
;SAME FOR DBL SYNC 

CLEAR ALL REGISTERS GIVE MSTCLR 
ZERO POINTER 


SZERO PROC. PRIO. 
SSEL THE RX BA PRI. 
SLOAD RX BA PR 


:SEL THE TX WC PRI. 
SET FOR 2 SYNC AND 200 (8) CHARS. 
:SEL_THE RX BA SEC 
;LOAD RX BA SEC 

7SEL RX WC SEC 

2SET FOR 200(8) CHARS 
:SEL_THE TX BA SEC 
LOAD IT 

sSEL THE TX WC SEC 
SET FOR 200 CHARS 
:SEL_THE SYNC REGISTER 
;LOAD SYNCS 


[SEL THE MISC REGISTER 


SET 8 BITS PER CHAR AND VRC ENABLL. 
71S JUMPER AT END OF CABLE? 
;BR IF YES 


:NO CABLE SET TEST LOOP FOR DATA TURN AROUND 
[SEL THE POLY REGISTER 

>SET PLOYNOMIAL. . 
ZSTART TO FILL, TX BUFFERS Z 

: COUNTER 


“PRIMARY IS BINARY COUNT BACKWARDS. 
‘DONE ? 


NO 
[SET SEC BUFFER 

[SECONDARY IS BINARY COUNT 
‘DONE ? 


:NO 
2SET RECEIVER INTERUPT POINTER 
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2777 * #240,QDQRLVL_ =; SET PRIO: TO 5 
2777 . 


0,aDQRCSR ;SET RX GO AND IE 
(MB1T3+B1T3+B170, apaTcsR SET TX GO AND IE AND ERROR IE 
_#75., TEMPS 7SET NUMBER OF INTERUPTS WANTED 
#16. , TEMPS :SET FOR 16 REGISTERS 
oT H17, @DQREG 7SEL RX BA PRI. 
SIT HERE AND MAKF WAVES 
WHILE INTERUPTS UCCUR 
Phat, hols hel, hal, hel, hel, hal, hol, hel hal, Aol hol hel, fel 
THAT aBhahahahahrhahrhrfrhr 


3 SAME 
[UPDATE COUNTER 
:KEEP GOING 
[RX FAILED TO CONTINUSLY INTERUPT 
;*****STRONGLY SUGGEST SWO8=1 (GOTO TOP OF TEST OF ERROR 
BR sKEEP_IT GOING. 
ENDTS2: :SCOPE THIS TEST 


NMNRO KLANMOT 


017737 176026 014266 TXISR: @DOQERR,ERR ZANY ERRORS 
100001 BPL .+4 


BR IF NO 
104004 4 ;DQ11 ERROR FLAG IS SET. 
;*****STRONGLY SUGGEST SWO8=1 (GOTO TOP OF TEST OF ERROR 
032777 176010 #B1T2,aDQTCSR : WHO SHOULD I SERVICE PRI OR SEC? 
Q 1$ BR IF SEC a SERVICE 
176004 MO #2, So ee GTC SEL TX_BA PRI 
175772 :CLEAR TX PRI DONE. 
175772 Ra 


) 3S PRI. 
#B1T6SBIT4, @DQREG ;SET WRITE EN. AND ENTER T 
#-200 ,aDQSEC ;LOAD TX WC PRI. 
#17, aDQREG :CLEAR REG POINTER. 
EXIT STAGE RIGHT 
#BIT6,aDQTCSR ;CLEAR TX SEC DONE 
#6, aDQREG SEL ° 
#XTXBUF ,ADQSEC ;LOAD TH BA SEC 
aDQR > SEL THE | TX .t SEC 
#B1T5+B1T4 ,aDOREG WRITE EN. AND EXIT T 
4-200 ,aDQseC SEC 
#17, QDQREG 


a i i tk td dd nd ot dt ot ot 
BSLERRASLESRLEARAVAS BHVAARAVNASSHIFALATLS 


sEXIT STAGE LEFT. 


001246 veg TEMP2 sLET Hf a a KNOW THAT RX INTERUPTED 
175654 @DOQERR,ERR ANY ERRORS 
+4 


" ‘BR IF NO 
’ coved STRONGLY SUCKEST  SW08= 1 (GOTO TOP OF TEST OF ER 
pakthe es ROR 
032777 000004 175632 #BIT2,@DQRCSR :WHO SERVICE PRI OR SEC 
001426 2$ :BR IF SEC NEEDS SERVICE 
042777 000200 175622 #B1T7,aDQRCSR CLEAR RX PRI. DONE 
105077 175626 CL ac REG SEL RX BA PRI. 
012777 013256 175622 #RXBUF F ,ADOSEC “LOAD IT 


SeseaRaees 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 
1 
1 
1 
1 
1 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
5 
1 
1 
1 
1 
1 
1 
4 
1 
1 
1 


NoNnono 
~~ 
mo 
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105277 175614 aDOR sSEL THE RX WC PRI. 
120 175606 WeLIS*B114, aDOREG ioe! WRITE EN. AND ENTER T 
175602 MOV #-200, aDQSEC LOAD R WC SEC 
HTXBFA ani PREPARE TO CHECK DATA. SET TX POINTER 
ARXBUFF ,R2 SET RX POINTER 
“GO AND CHECK DATA 
WBIT6,ADQRCSR  =CLEAR RX SEC DONE 
#4, aDOREG SSEL RX BA SEC 


AXRXBUF ,ADQSEC  :L IT 
@DOREG “SEL THE RX WC SEC 
#01 13+B1 14. 4-D0REG ant WRITE EN. AND EXIT T 


ronronononenoenors 
a ed ced cad ed ed od 
WOOO NIO UNSW 


(R1)+, (R2)+ 
$ 


7 
175464 MOVB #12, aDQREG 
000002 175460 #B1T1,aDQSEC 
014302 MOVB -(R1) ,GDCHAR 
014274 or ee 


SUR UU SO ANRAARUNN 


ARE ERROR 
{ e##8STRONGL Y SUGGEST SWO8=1 (GOTO TOP OF TEST OF ERROR 
(R1)+,(R2)+ ;POP POINTERS 
RO ALL DATA CHECKED? 
4$ BR IF NO 
001250 +3 ive? sALL INTERUPTS DONE? 


sm aia tk ak a a th ad od 6 8 2 2 2 ed 2 ee 


Roforonory 
myn 
ro) 


NO KEEP_INTERUPTING 
: :STOP THE SHOW CLEAR THE WORLD 
0033%2 MO MENDTS2, (SP) SET FOR END TEST RETURN 
000017 175414 : #17, QDOQREG ZCLEAR REG POINTER 
RT! EXIT STAGE MIDDLE 
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:TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
sTHIS TEST WILL a Ny AND RECV CHARACTERS 

SAT 2 BITS/PER/CHAR 

DATA CHECKING WILL BE PERFORMED! 


¢ Test 

S coaditalatiiadiaiedeises seuhantaisdadieminsinscduabaddeuatéandanimanel 
012737 000003 TST3: #3,TSTNO 

0 004324 MOV ATST4G NEXT 


vw 
Ws 


Ww 
0 


CLEAR _ALL_ THE DQ11 


013256 MOV #RXBUF F ,RO [LOAD THE BUFFER POINTER 
R1 SET UP TO CLEAR THE BUFFER 
naa CL LEAR IT 


Mrvnronrnsrererenrs 
ARGOS SHIEAE ANS 


BP 5$ ‘BRANCH IF 
000011 #11, a@DOQREG SSELECT THE NOYNC REG 
013052 SYNC, TEMP2 [LOAD SYNCS 

177774 #177774,MASK = LOAD THE MASK 

012370 001246 ) MASK, TEMP2 :SET UP A MASK TO GET THE 
001510 TST basTA AT : SINGLE SYNC CHARACTER? 


: CORRECT SYNC_ CHARACTER 
OR THIS ‘geo’e LENGTH 


RRRR 


001246 OR' TEMP2 
012370 001247 : MASK, TEMP2+1 


R TEMP2+1 ;PROPER SYNC CHARACTER 
012372 TEMP2 ,SYNC1 ;LOAD THE CHARACTER 
012374 TEMP2, SYNC2 :DITTO 
175260 MO TEMP2 , @DQSEC ;LOAD THE SYNC REGISTER 
@DQREG sSEL THE MISC REGISTER 
175246 MO ro Ae aDQSEC ;SET TEST LOOP 


»RO 
“FLIP THE BYTES 
RO, @DQSEC 'SET CHARACTER LENGTH 
175226 #B1T1,aDQSEC :TURN CLOCK OFF. 


175220 #B1T1,a@DQSEC 
@DQREG 7SEL RX PRIMARY ADRESS 
175206 MOV A#RXBUFF ,ADQSEC ;SET ADRESS 
QR SEL RX PRIMARY CHAR COUNT 
175174 MO #-36. ,@DQSEC SET CHAR COUNT 
QR 3SEL TX ree ADDRESS 
175162 MOV MSYNC2,@DQSEC ;LOAD THE SYNC CHAR 
QREG SEL TX PRI CHAR COUNT 
175150 MOV 4-38. ,aDQSEC :SET CHAR COUNT 
@DQRCSR 
aDQTCSR 
R5 
aDQRCSR 
2$ 
#1,R5 
1$ 


WWh- 
NOAM 


SEPSERRSERERE 
SIRSNYRS 


LO 


oO 
Nm 


START TIMING 
BRANCH IF YES 


‘BR IF ee Li GO 

1 sERROR=-NO RX DONE 

#7 “BUFF ,RO [LOAD BUFFER POINTER 
#RXBUFF ,R1 ;LOAD RX BUFFER POINTER, 


SBBVZIBIIIBIS 


SSS 
wr 
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012702 3 #36. ,R2 3SET UP TO COUNT CHARACTERS 
(RO) +,R5 GET A CHARACTER TO COPMARE 
TEMP2 iF 
:GET REC CHARACTER 
MOVE TO_R4 
sMASK OUT UNWANTED BITS 
DO THE CHARACTERS MATCH? 
:BR_IF OK 
sERROR=-DATA DOESN'T MATCH 
;ALL DONE? 


sALL DONE? 
:NO=-GO BACK FOR MORE 
SCOPE THIS TEST 


By 


SES 


1246 
12370 


WINWWNWNWWW 
2 SS SS 
WOON AUS WIR O 


WAG 
= 


:TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
;THIS TEST WILL XMIT AND RECV CHARACTERS 

sAT_3 BITS/PER/CHAR. 

DATA CHECKING WILL BE PERFORMED! 


TEST 4 


SERRE RK RR KR RRA REE EREKEEKEEEEEKKE 


012737 000004 TST4: #4, TSTNO 
12 MOV 


Mie 


Ww 
N 
CONAUSWRS 


ASRS 


ROK 


ATSTS NEXT 
:CLEAR ALL THE DQ11 
#RXBUF F ,RO ;LOAD THE BUFFER POINTER 
R1 SET UP TO CLEAR THE BUFFER 
(RO) + CLEAR IT 
R1 ; DONE ? 


5$ “BRANCH IF NO 
#11, a@DQREG :SELECT THE SYNC REG 
SYNC, TEMP2 :LOAD SYNCS 
MOV #177770,MASK sLOAD THE MASK 
001246 TEMP2 :SET UP A MASK TO GET THE 
| : SINGLE SYNC CHARACTER? 


IF YES,BR. 
CORRECT SYNC CHARACTER 
:FOR THIS CHARACTER LENGTH 


QEGRUNS 


WIWWNWWNIWNWIANW WS 
N 


OS 


ORB TEMP2 
001247 : MASK, TEMP2+1 


: H THE 

R TEMP2+1 ;PROPER SYNC CHARACTER 

012372 ;LOAD THE CHARACTER 

012374 ;DITTO 

174712 MOV ;LOAD THE SYNC REGISTER 
@DCREG 


[SEL THE MISC REGISTER 
174700 #BIT3 LOOP 
#15,R0 


EEFELEL ELS 
SWMNMNMNM Wh 
RESSL SS 


WTO NOAUEWN—OOONAUSWN—O 
Oo 


aDQsSEC SET TEST 


FLIP THE BYTES 
RO, @DQSEC :SET CHARACTER LENGTH 
174660 #B1T1,aDQSeEr ; TURN CLOCK OFF... 
174652 #B1T1,aDQSEC :AND ON 
;SEL RX PRIMARY ADRESS 


@DQREG 
174640 SAE? aOeaEe :SET ADRESS 


aD SEL RX PRIMARY CHAR COUNT 
174626 MOV 2 2es sSOOSEC ;SET CHAR COUNT 


:SEL TX PRIMARY ADDRESS 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


WINWWWAIWNIAIWNIAWG 
MMA AMAA) 


174620 
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ROGRAM INITIALIZATION AND START UP. 


A#SYNC2 ,ADQSEC ;LOAD THE SYNC CHAR 

DQREG ;SEL TX PRI CHAR COUNT 
#-38. ,aDQSEC SET CHAR COUNT 

DQRCSR SET RX GO 
aDQTCSR SET TX GO 
R sSTART TIMING 
aDQRCSR 31S DONE UP? 
2$ sBRANCH IF YES 
#1,R5 : T 
1$ 3;BR IF MORE TO GO 
1 sERROR=--NO RX DONE 
ATXBUFF ,RO ;LOAD BUFFER POINTER 
ARXBUFF ,R1 ;LOAD RX BUFFER POINTER 
#36.,R2 ;SET UP TO COUNT CHARACTERS 
ne ;GET A CHARACTER TO COPMARE 
(R1)+, TEMP2 ;GET REC CHARACTER 
TE sMOVE TO R4 

sMASK OUT UNWANTED BITS 
;DO THE CHARACTERS MATCH? 

7BR IF OK 
s ERROR~~DATA DOESN'T MATCH 

LL DONE? 


“NOH -GO BACK FOR MORE 
‘SCOPE THIS TEST 


g | 


174614 
174602 


012374 
1746 


SIRISISSSSSESESS 


WNWWNWWWWWw 


SN 
on 


NN 


SEEREREResS 


TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
2 THIS TEST WILL oh AND RECV CHARACTERS 

SAT 4 BITS/PER/CHA 

:DATA CHECKING WiLL "BE PERFORMED! 


; Yes’ $ 


JUISIIOIOIIISIISISIDISIOIIISISIOISIOISIOIOIDIDIDIOIOIDIDIUIOIDIOIIIOIOIOIDIIOIDISI TOIT IIT OI III III IIIT I IOI IE 
001226 TSTS: #5, TSTNO 
001216 #TST6,NEXT 
ay ALL THE DQ11 


ARXBUF F ,RO ;LOAD THE BUFFER POINTER 
R1 SET UP TO CLEAR THE BUFFER 


8 


00.0 
Wr 


012737 


1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


SWNWAWWWANAw 
SBRLERE 


174436 
001246 

012370 
001246 


(RO) + [CLEAR IT 
R1 ; 


5$ 

#11, aDOREG 
SYNC, TEMP2 
#177760,MASK 
MASK, TEMP2 
DOSTAT 


3 
TEMP2 
MASK, TEMP2+1 
TEMP2+1 


TCMP2, SYNC] 
TEMP2 ,SYNC2 


BRANCH IF NO 
SELECT THE SYNC REG 
;LOAD SYNCS 

LOAD 


THE MASK 
:SET UP A MASK TO GET THE 
SINGLE SYNC CHARACTER? 
7 IF YES,BR. 


: CORRECT SYNC CHARACTER 
;FOR THIS yok LENGTH 

;MANIPULATE DATA T 

COME UP WITH TH HE. 

SPROPER SYNC CHARACTER 
;LOAD THE CHARACTER 

;DITTO 
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013777 001246 174344 TEMP2 , a@DQSEC ;LOAD THE SYNC REGISTER 
174336 a@DQREG SEL THE MISC REGISTER 
000010 174332 MOV #B1T3,aDQSEC :SET TEST LOOP 

000014 #14,R0 


WAB RO :FLIP THE BYTES 
174320 RO, @DQSEC 3 SET Ok ise snengor 
000002 174312 #B1T1 ,aDQSEC — CLOCK OFF 
174304 #B1T1,aDQSEC AND ON 
SEL ys PRIMARY ADRESS 


@DQREG 
174272 MO WRXBUFF ,@DQSEC SET ADRESS 
@DQREG SEL RX PRIMARY CHAR COUNT 
174260 MO #-36.,@DQSEC  :SET CHAR COUNT 
@DOREG SEL TX PRIMARY ADDRESS 
174246 MO #SYNC2,@DQSEC LOAD THE SYNC CHAR 
@DQREG ZSEL TX PRI CHAR COUNT 
174234 #-38. , ADQSEC ET CHAR COUNT 
7 @DQRCSR 
174216 aDaTCSR 
174204 @DORCSR 
BM 2$ 


000001 #1,R5 
1$ 


cat cal al eel all an cat cal alt cal ails ald al 
at ae te at ae ae et tt ee 


* 
3 eesbiatien Recast anshape baile. 


IS 
alt IF YES 
:BR_IF MORE TO GO 
1 SERROR--NO RX DONE 

012376 : ATXBUFF ,RO ;LOAD BUFFER POINTER 
013256 ARXBUFF ,R1 :LOAD RX BUFFER POINTER 
000044 #36. .R2 SET UP TO COUNT CHARACTERS 
— :GET A CHARACTER TO COPMARE 
(R1)+,TEMP2 GET REC CHARACTER 

sMOVE TO R4 

MASK OUT UNWANTED BITS 

:DO THE CHARACTERS MATCH? 

BR IF OK 
;ERROR--DATA DOESN'T MATCH 
;ALL DONE? 


‘NO=-GO BACK FOR MORE 
> SCOPE THIS. TEST 


ee ed ed ed od wd 
RARRRARRRR 


001 
001 
001 
01 


246 
246 
246 
2370 


:TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
THIS TEST WILL XMIT AND RECV CHARACTERS 

SAT 5 BITS/PER/CHAR. 

DATA CHECKING WILL BE PERFORMED! 


* TEST 
Pl inh, Bateplae De ie ani NT NE ic DEAN I, ed RRAEEEKKEEREKEE 
000006 001226 TSTé: #6,TSTNO 
005606 001216 MO ATST7,NEXT 
;CLEAR ALL THE DQ11 


013256 MOV #RXBUF F ,RO LOAD THE BUFFER POINTER 
RI SET UP TO CLEAR THE BUFFER 
{R0)+ :CLEAR IT 


; DONE ? 
5$ ;BRANCH IF NO 


=—=900-00 
S9$S=S25 
IS8s 
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112777 000011 174070 #11, Q@DQREG SELECT THE SYNC REG 
001246 LOAD SYNCS 
012370 MOV LOAD THE MASK 
001246 TEMP2 SET UP A MASK TO GET THE 
TST DQSTA sSINGLE SYNC CHARACTER? 


:IF YES,BR. 
; CORRECT SYNC CHARACTER 
RORB TEMP2 ;FOR THIS ‘gon LENGTH 
001247 10$: MASK , TEMP2+1 ;MANIPULATE DATA TO 
;COME UP WITH T HE 
TEMP2+1 [PROPER SYNC CHARACTER 
012372 TEMP2 SYNC] LOAD THE CHARACTER 
012374 TEMP2 ,SYNC2 ;DITTO 
173776 MO TEMP2 , @DQSEC ;LOAD THE SYNC REGISTER 
@DQREG SEL THE ois REGISTER 
173764 MO motte aDQSEC 2 SET TEST LOOP 


RO 
“FLIP THE BYTES 
RO, ADQSEC SSET CHARACTER LENGTH 
173744 #B1T1,aDQSEC : TURN SELOCK OFF... 


173736 #B1T1,aDQsEC 
@DOREG EL RX PRIMARY ADRESS 


$$ 
173724 MOV #RXBUFF ,ADQSEC ;SET ADRESS 
@DQREG 7SEL RX PRIMARY CHAR COUNT 
173712 MO Pe >SET CHAR COUNT 
173700 MOV ASYNC2 ,ADQSEC 
@DOQR 


G 
173666 ome Nae C 


ae TX PRIMARY ADDRESS 
SYNC CHAR 


eg GO 
sSTART TIMING 
55 D ? 
;BRANCH IF YES 
sWAIT 
;BR IF MORE TO GO 
1 ;ERROR--NO RX DONE 
presce : #TXBUFF ,RO ;LOAD BUFFER POINTER 


ARXBUF F ,R1 ;LOAD RX BUFFER POINTER 
#36.,R2 SET UP TO COUNT CHARACTERS 


a :GET A CHARACTER 'O COPMARE 
(R1)+, TEMP2 GET REC CHARACTER 

TEMP2 ,R4 SMOVE TO R4 

MASK ,R5 :MASK OUT UNWANTED BITS 
R5,R4 ‘pe + aaa MATCH? 


4$ I 
2 ;ERROR--DATA DOESN'T MATCH 
R2 ALL DONE? 

FOR MORE 


:NO--GO BACK 
: SCOPE THIS. TEST 


173636 
000001 


$3 
GR 


33 


QAP AAA AIM AVT UT 
aed aed aed cad ad eh ad cs cd 
WOONAUS WO 


VRRP 


kd od 4) od ed 
NOUBWR = 


Vabvabealealeal 


sTEST OF TANSMITTER AND RECEIVER CHARATER LENGHTHS 
:THIS TEST WILL XMIT AND RECV CHARACTERS 
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:AT_6 BITS/PER/CHAR. 
[DATA CHECKING WILL BE PERFORMED! 


y VEST r 


aie. tie OP SEM eto tt are a ee ee ee eee 


ViVi 
mr 
woo 


TST7: 


Ww MADAMA MAMA MYVIVIWIUIVIV 
aS Sat eae er aera an 


VAVYIMA WIT UU) 
SEE SESTSTRADAAAL AR 


SINS NN 
BISARANISS 


, 
1 
1 
1 
1 
1 
, 
; 
: 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


PAPAAAAAA ASIII 


eehet os 


173302 
173270 
000001 


012376 
013256 
000044 


001246 


001246 


001247 


012372 
012374 
173430 


173416 


173376 
173370 


173356 
173344 
173332 
173320 


#7,TSTNO 
aTSTIO NEXT 
#RXBUF F ,RO 
R1 
(RO) + 
R1 


5$ 

#11, a@DOQREG 
SYNC, TEMP2 
#177700, MASK 
f . TEMP2 
DQSTAT 

10$ 


TEMP2 

MASK, TEMP2+1 
TEMP2+1 
TEMP2,SYNC1 
TEMP2,SYNC2 
Hn ais 


aDoR 
#B1T3, aDQSEC 
#i2,.RO 


R 

RO, @DQSEC 

#B1T1 ,aDQSEC 
1T1,aD0 


aDQREG 
#-36. ,aDQSEC 
QREG 


aD 
A#SYNC2 , @DQSEC 
@DQREG 


#-38. , ADQSEC 
aDORCSR 
aDOTCSR 

R5 

@DORCSR 

2$ 

#1,R5 

1s 
#TXBUFF RU 
#RXBUF FRI 
#36. .R2 


(RO) + R5 
TEMP2 


CLEAR ALL THE DQ11 

;LOAD THE BUFFER POINTER 
SET UP TO CLEAR THE BUFFER 
CLEAR IT 


BRANCH IF NO 
sSELECT THE SYNC REG 
;LOAD SYNCS 

;LOAD THE MASK 

:SET UP A MASK TO GET THE 
SINGLE SYNC CHARACTER? 


:IF YES,BR. 

:CORRECT SYNC CHARACTER 

:FOR THIS Pek ta LENGTH 
MANIPULATE a TO 

= COME UP WITH THE 

:PROPER SYNC CHARACTER 

DITTO. CHARACTER 


‘LOAD THE SYNC REGISTER 
[SEL THE MISC REGISTER 
:SET TEST LOOP 


FLIP THE BYTES 
3 SET rey peta 
; TURN CLOCK 


AND ON 

SEL RX PRIMARY ADRESS 
SET ADRESS 

;SEL RX PRIMARY CHAR COUNT 
:SET CHAR COUNT 

:SEL_TX PRIMARY ADDRESS 
LOAD THE SYNC C 

sSEL TX PRI CHAR COUNT 
:SET CHAR COUNT 

SET RX GO 

SET TX GO 

START TIMING 


:1S DONE UP? 
BRANCH IF YES 
:BR IF MORE TO GO 


SERROR--NO RX DONE 
[LOAD BUFFER POINTER 


;LOAD RX BUFFER POINTER 
:SET UP TO COUNT CHARACTERS 


:GET A CHARACTER TO COPMARE 
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112137 001246 (R1)+, TEMP2 GET REC CHARACTER 
001246 MOV TEMP2 ,R4 MOVE TO R4 
912370 MASK ,R5 MASK OUT UNWANTED BITS 
MP 5 :DO THE CHARACTERS MATCH? 


BR IF OK 
= ERROR==DATA DOESN'T MATCH 
LL DONE? 


BN “NO== GO BACK FOR MORE 
104400 SCOPE THIS TEST 


:TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
STHIS TEST WILL + AND RECV CHARACTERS 

SAT 7 BITS/PER/CHA 

[DATA CHECKING Wite "BE PERFORMED! 


; Test 0 
SERRA REE REE REE REE EEK ERE REE REE ERE EEE ERE ERE EEE 
012737 000010 001226 TsT10: #19, TSTNO 
006522 001216 MOV #TST11,NEXT 
sCLEAR ALL THE DQ11 


013256 MOV #RXBUFF ,RO ‘LOAD THE SUFFER POINTER 
RI :SET UP TO CLEAR THE BUFFER 
(RO) + *CLEAR IT 
R1 = DONE ? 
5$ ‘BRANCH IF NO 
#11, aDQREG *SELECT THE SYNC REG 
SYNC , TEMP2 ‘LOAD SYNCS 
#177600,MASK LOAD THE MASK 
, TEMP2 SSET. UP A MASK TO GET THE 
DOSTAT : SINGLE SYNC CHARACTER? 


10$ BR. 

:Conne SYNC_ CHARACTER 
TEMP? THIS CHARACTER LENGTH 
MASK, TEMP2+1 MANIPULATE ag TO 


COME UP WITH THE 
TEMP2+1 : PROPER SYNC CHARACTER 
TEMP2, SYNC1 zL rT To OAD THE CHARACTER 

:LOAD THE SYNC REGISTER 
@DQREG SEL THE MISC REGISTER 
ate a@DQsEC SET TEST LOOP 


RO : 
‘FLIP THE BYTES 
RO, @DOSEC :SET CHARACTER LENGTH 
173030 #BiT1,aDQSEC TURN CLOCK 0 


173022 #B1T1, aDQsEC 

@DOREG SEL RX PRIMARY ADRESS 
173010 MO MRABUFF ,ADQSEC ;SET ADRESS 

@DOQREG [SEL RX PRIMARY CHAR COUNT 
172776 MO #-36. ,aDQSEC SET CHAR COUNT 

@DQREG :SEL TX PRIMARY ADDRESS 
172764 MO MSYNC2,@DQSEC ;LOAD THE SYNC CHAR 

@DQREG ‘SEL TX PRI CHAR COUNT 
172752 MO 4-38. ,aDQSEC [SET CHAR COUNT 

aDORCSR SET RX GO 


3 


KOKRAARAXAA AO 
aad and ad od and a em eld cd aed 


1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


COUODNAWNSWI Oo 


& 
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172734 aDQTCSR 
CL R5 
172722 1$: @DQRCSR 
BMI $ 


#1,R5 
1$ 


SET TX_GO 
:START TIMING 
;1S DONE UP? 
BRANCH IF YES 
; WAIT 

TO GO 
1 ON 
#TXBUFF ,RO 


A#RXBUFF ,R1 F IN 
#36. ,R2 SET UP TO COUNT CHARACTERS 


— :GET A CHARACTER TO COPMARE 
(R1)+, TEMP2 :GET REC CHARACTER 
TEMP2.R4 “MOVE TO R4 
012370 MASK ,R5 ‘MASK OUT UNWANTED BITS 
MP 5 RG :d9 THE CHARACTERS MATCH? 


OK 
sERROR=-DATA DOESN'T MATCH 
ALL DONE? 


:NO--GO BACK FOR MORE 
:SCOPE THIS TEST 


TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
THIS TEST WILL XMIT AND RECV CHARACTERS 

SAT 8 BITS/PER/CHAR 

[DATA CHECKING WILL BE PERFORMED: 


» FEST TF 


SAAR RRR E EERE RARER EEE REE ERR EEE EE 


001226 TST11: #11,TSTNO 


#TST12,NEXT 
CLEAR ALL THE DQ11 
#RXBUF F ,RO [LOAD THE BUFFER POINTER 
R1 SET UP CLEAR THE BUFFER 
ere CLEAR IT 


esee 


882 


‘DONE ? 
5$ ;BRANCH IF NO 
#11, aDQREG :SELECT THE SYNC REG 
sLOAD SYNCS 
= LOAD THE MASK 
;SET UP A MASK TO GET te 
: SINGLE SYNC CHARACTER 


-BR. 
‘CORRECT SYNC CHARACTER 
:FOR THIS ‘gov LENGTH 
MANIPULATE og 

[COME UP WITH THE 

:PROPER SYNC CHARACTER 

Loo THE CHARACTER 
TEMP? , DOSE C LOAD THE SYNC REG 
aDORE G SEL THE MISC REGI 
AE at 7SET TEST LOOP 
#i0, : 


-=O0——— 
SRSSA55 
MIWNIWNOUW 
NNNN a) 

NO 


ISTER 
STER 
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1696 006674 000300 SWAB RO sFLIP THE BYTES 
1697 006676 050077 172470 BIS RO, aDQSEC SET rock OFF pene 
1698 006702 052777 900002 172462 BIS #B1T1,aDQSEC ; TURN CLOCK 
1699 006710 042777 000002 172454 BIC #B1T1,aDQSEC ‘AND ON 
1700 006716 105077 172446 CLRB @DQREG 7SEL RX PRIMARY ADRESS 
1701 006722 012777 013256 172442 MOV #RXBUF F , ADQSEC SET ADRESS 
1702 006730 105277 172434 INCB @DQREG SEL RX PRIMARY CHAR COUNT 
1703 734 012777 177734 172430 MOV #-36. ,aDQSEC SET CHAR COUNT 
1704 006742 105277 172422 INCB @DQREG sSEL TX PRIMARY ADDRESS 
1705 006746 012777 012374 172416 MOV MSYNC2,@DQSEC  ;LOAD THE SYNC CHAR 
1706 006754 105277 172410 . INCB @DQREG 3SEL TX PRI CHAR COUNT 
1707 006760 012777 177732 172404 MOV 4-38. ,aDQSEC 3SET CHAR COUNT 
1708 006766 0052 172366 INC @DQRCSR ;SET RX GO 
1709 006772 005277 172366 INC @DQTCSR sSET TX GO 
1710 006776 005005 CLR R5 sSTART TIMING 
1711 007000 105777 172354 1§$: TSTB @DQRCSR i1S D UP? 
1712 007004 100404 BMI 2$ ;BRANCH IF YES 
1713 007006 062705 000001 ADD #1,R5 WAIT 
1714 007012 001372 BNE 1$ ‘BR IF oi Log GO 
1715 007014 104001 HLT 1 sERROR--NO RX DONE 
1716 007016 2700 012376 es: MOV #TXBUFF ,RO ;LOAD BUFFER POINTER 
1717 007022 012701 013256 MOV #RXBUFF ,R1 ;LOAD RX BUFFER POINTER 
fas | SoOks 012702 000044 35 MOV #36.,R2 ;SET UP TO COUNT CHARACTERS 
1720 007032 112005 MOVB (RO)+,R5 :GET A CHARACTER TO COPMARE 
1721 007034 005037 001246 CLR TEMP2 
1722 007040 112137 001246 MOVB (R1)+, TEMP2 “GET REC CHARACTER 
1723 007044 3704 001246 MOV TEMP2 ,R4 :MOVE TO R4 
1724 007050 043705 012370 BIC MASK ,R5 :MASK OUT UNWANTED BITS 
1725 007054 020504 CMP R5,R4 :DO THE CHARACTERS MATCH? 
1726 007056 001401 BEQ 4$ 7BR IF OK 
1727 007060 104002 HLT 2 sERROR==DATA DOESN'T MATCH 
1728 007062 005302 4$: DEC R2 ALL DONE? 
1729 007064 001362 BNE 3$ “NO--GO BACK FOR MORE 
he 007066 104400 SCOPE ;SCOPE THIS TEST 
1732 
1733 ; TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
1734 sTHIS TEST WILL XMIT AND RECV CHARACTERS 
1735 SAT 9 BITS/PER/CHAR 
fe [DATA CHECKING WILL “BE PERFORMED! 
1738 TEST 12 
1739 LORE A EEA ARER AER EERE RAAT TAERE KER Eee Ree ee eee ee 
1740 007070 012737 1 001226 75112: MOV #12,TS™NO 
1741 007076 012737 007420 001216 MOV #Tst13, NEXT 
1742 007104 104413 MEMCLR :CLEAR ALL THE DQ11 
1743 007106 012700 013256 MOV #RXBUFF ,RO ;LOAD THE BUFFER POINTER 
1744 007112 005001 CLR R1 :SET UP TO CLEAR THE BUFFER 
1745 007114 005020 5$: CLR (RO) + :CLEAR IT 
1746 007116 105201 INCB R1 ; DONE ? 
1747 007120 109375 BPL 5$ ;BRANCH IF NO 
1748 007122 112777 000011 172240 MOVB #11, @DQREG sSELECT oe, SYNC REG 
1749 007130 013737 013052 001246 MOV SYNC, TEMP2 SLOAD SYN 
1750 007136 012737 177000 012370 MOV #°77000,MASK =: LOAD THe mask 
1751 007144 043737 012370 001246 BIC MASK, TEMP? SET UP THE MASK FOR THE 
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;CORRECT SYNC CHARACTER 
001246 TEMP2 :SH 
001510 DOSTAT ‘SINGLE SYNC CHARACTER? 
10$ :1F NO,BR. 
177777 012372 #-1,SYNC1 Z1F YES, MARK. 
BR 208 : CONTI 
012372 TEMP2, SYNC1 [LOAD THE CHARACTER 
012374 TEMP2,SYNC2_ DITTO 
172152 MOV  TEMP2,@DQSEC LOAD THE SYNC REGISTER 
aDOREG SEL THE MISC REGISTER 
172140 #113, @dQse( :SET TEST LOOP 
RO ZFLIP THE BYTES 
RO, @DQSEC :SET CHARACTER LENGTH 
172120 #BiT1,aDQSEC :TURN CLOCK OFF 
172112 #8171, a@DOSEC ON 
aDOREG RX PRIMARY ADRESS 
172100 WRXBUFF ,@DOSEC SET ADRESS 
@DOREG SEL RX PRIMARY CHAR COUNT 
172066 MO #36, ,aDQSEC SET CHAR. COUNT 
REG ;SEL_TX PRIMARY ADDRESS 
172054 wSYNCT. ,@DQSEC SYNC CHAR 
172042 MO #-38. ,aDQSEC 
aparcér 
172024 aDOTCSR 
172012 1S: @DORCSR 
BM 2$ 


#1,R5 
1$ 


a3 


1 

#TXBUFF ,RO 

ARXBUFF RI st IN 
#36..R2 SET UP TO COUNT CHARACTERS 


(RO)+,R5 GET ANOTHER CHAR 
[GET A REC CHAR 
012370 MASK ,R5 ;MASK OUT UNWANTED BITS 
MP R5,R4 3:DO THE CHARACTERS MATCH? 
4$ BR IF OK 


SERROR--DATA DOESN'T MATCH 
ALL DONE? 


‘NO=-GO BACK FOR MORE 
SSCOPE THIS TEST 


i TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
THIS TEST WILL XMIT AND RECV CHARACTERS 

SAT 10 BITS/PER/CHAR. 

[DATA CHECKING WILL BE PERFORMED! 


TEST 13 
hata tt gaat a aaa ali hati 
$5113: MOV a°?,TSTNO 

MOV MTST1G.NEXT 


POR GSC SSeS OREN ae TR RAE TSS 


; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


=: 
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FROGRAM INITIALIZATION AND START UP. 


oe $ 


00 00 09 CO C0 00 00 00 C0 CO 
aol aad td aad cad cat and and al ald 
WODONAUSWIRO 


kk kk tk ak a oh ts ts 
MEBWR= 


GRARESSRESERERES 


013256 


000011 
013052 
176000 
012370 


001246 
001510 


177777 


171462 
000061 


012376 
013256 
000044 


012370 


2 
012374 


171622 
171610 


171570 
171562 


171550 
171536 
171524 
171512 


MEMCLR 
MOV 


#RXBUF F ,RO 
R1 

(RO) + 

R1 

5$ 

#11, aDQREG 
SYNC, TEMP2 
#176000 ,MASK 
MASK, TEMP2 
TEMP2 

DQSTAT 

10$ 
#~-1,SYNC1 
20$ 
TEMP2,SYNC1 
TEMP2, SYNC2 
TEMP2, ADOSEC 
aDOREG 
#B1T3, aDQSEC 
#6 RO 

RO 

RO, ADQSEC 


#B1T1,aDQSEC 
#B1T1,aDQSEC 


@DQREG 
#RXBUF F ,@DQSEL 
QREG 


aD 
#-36. , @DQSEC 
@DQREG 


#SYNC1 ,@DQSEC 
@DQREG 


#-38. , aDQSEC 
@DQRCSR 
a@DQTCSR 
R5 

@DOQRCSR 
2$ 

#1,R5 

is 
#TXBUFF ,RO 
ert . R1 
#36. ,R2 
m5 R5 


;CLEAR_ALL THE DQ11 

;LOAD THE BUFFER PC NTER 
SET UP TO CLEAR THE BUFFER 
:CLEAR IT 

; DONE? 


;BRANCH IF NO 

;SELECT THE SYNC REG 
LOAD SYNCS 

cL THE MASK 

SET UP_THE MASK FOR THE 
3 try od Ft CHARACTER 


sSHIFT I 

SSINGLE SYNC CHARACTER? 
: IF NO,BR. 

SIF YES, MARK. 


CONTINUE. 
‘bitto THE CHARACTER 


;LOAD THE SYNC REGISTER 
7SEL THE MISC REGISTER 
:SET TEST LOOP 


“FLIP THE BYTES 
SET CHARACTER meine 
a CLOCK OFF. 


AND ON 
SEL RX PRIMARY ADRESS 
7SET ADRESS 

SEL RX PRIMARY CHAR COUNT 
SET CHAR COUNT 

:SEL TX ro a 


:IS 
oN IF YES 


:BR_IF MORE TO GO 
ERROR--NO RX DONE 
; LOAD BUFFER POINTER 
;LOAD RX BUFFER POINTER 
SET UP TO COUNT CHARACTERS 


GET ANOTHER CHAR 

[GET A REC CHAR 

;MASK OUT UNWANTED BITS 
:DO THE CHARACTERS MATCH? 


BR_IF OK 
sERROR~=DATA DOESN'T MATCH 
ALL DONE? 


“NO-- -GO BACK FOR MORE 
“SCOPE THIS TEST 
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BR 


;TEST OF TRANSMITTER AND RECEIVER egal LENGHTHS 
:THIS TEST WILL ae AND RECV CHARACTERS 

ZAT_11 BITS/PER/CHAR 

DATA CHECKING WILL BE PERFORMED! 


TEST 14 
a gee ag F ig a dali a al tai 
012737 000014 V #14,TS 
010300 MOV aIstis NEXT 


See ae 


me ed ng od ot a od 2 8 
Seeee 
Fwn-oo 


CLEAR ALL THE DQ11 


Oo 
™“N 
uw 


— 4 
See 
Save 


SSB Eee eR RES 


013256 


000011 
013052 
174000 
012370 
001246 
001510 


177777 


012372 


012372 
012374 
171272 


ARXBUF F ,RO 
R1 

(RO) + 

R1 


5$ 
#11, aDQREG 


MASK, TEMP2 


TEMP2 
DQSTAT 

10$ 
#~1,SYNC1 
20$ 

TEMP2 ,SYNC1 


TEMP2,SYNC2 
TEMP2 ,aDQSEC 


;LOAD THE BUFFER POINTER 
:SET UP TO CLEAR THE BUFFER 
CLEAR IT 


;BRANCH IF NO 

sSELECT THE SYNC REG 

= LOAD SYNCS 

;LOAD THE MASK 

;SET UP THE MASK FOR THE 
SOIT IT SYNC CHARACTER 
SSINGLE SYNC CHARACTER? 


SIF NO,BR. 
SIF YES, MARK. 

= CONTINUE . 

‘bitroe CHARACTER 

: THE SYNC REGISTER 


LOAD 
@DQREG_ ZSEL THE MISC REGISTER 
171260 MO op Tn -anesee 2 SET TEST LOOP 


: “FLIP THE BYTES 
RO, ADQSEC :SET CHARACTER LENGTH 
171240 #B1T1,aDQSEC :TURN CLOCK OFF... 


171232 #B1T1 ,aDQSEC 
@DOREG SEL RX PRIMARY ADRESS 
171226 MO —— ,@DQSEC :SET ADRESS 


REG 7SEL RX PRIMARY CHAR COUNT 
171206 MO #36. , @DQSEC 7SET CHAR COUNT 
QR SEL TX PRIMARY ADDRESS 

171174 MO #SYNC1,@DQSEC SYNC CHAR 

@DOQREG 
171162 MO #-38. , ADQSEC 

@DQRCSR 

aDQTCSR 

R5 

@DOQRCSR 

2$ 

#1,R5 

1$ 


WN 


SSssEe 


ROROR SESE 


358 


71S D 

BRANCH IF YES 

‘BR IF - hag GO 

1 sERROR--NO RX DONE 
#TXBUFF RO ; LOAD BUFFER POINTER 


#RXBUFF RI ;LOAD RX BUFFER POINTER 
#24. Re Ser UP TO COUNT CHARACTERS 


1 
1 
1 
1 
1 
1 
1 
1 
7 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


wowOOOOOOO0OD 
mm ee eed ed od ed 
WONAWURWR-—O 
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PROGRAM INITIALIZATION AND START UP. 


(RO) +,R5 GET ANOTHER CHAR 
MO SGET A REC CHAR 
912370 MASK ,R5 ;MASK OUT UNWANTED BITS 
MP 5 DO THE CHARACTERS MATCH? 


BR IF OK 
;ERROR==DATA DOESN'T MATCH 
LL DONE? 


“NO -GO BACK FOR MORE 
‘SCOPE THIS TEST 


CZDQH MACY11 30A(1052) 
CZDQHD.P11 09-JUN=78 07 


010254 


010276 


TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
erty TEST WILL all AND RECV CHARACTERS 

12 BITS/PER/CHAR 
DATA CHECKING WILL BE PERFORMED! 


TEST 15 . 


SEEKER ERE EEE REE REE KEE EEE REE ER 


TST15: #15, TSTNO 


#TST16,NEXT 
CLEAR ALL THE DQ11 
#RXBUF F ,RO ;LOAD THE BUFFER POINTER 
R1 ;SET UP TO CLEAR THE BUFFER 
ere [CLEAR IT 


000015 001226 
010630 001216 
013256 


? 


5$ BRANCH IF NO 

000011 171030 #11, aDQREG sSELECT THE SYNC REG 

013052 LOAD SYNCS 

170000 LOAD THE MASK 

012370 1246 MASK, TEMP2 7SET UP_THE MASK FOR THE 
+ CORRECT SYNC CHARACTER 

001246 HIFT IT 


TI 
001510 SINGLE SYNC CHARACTER? 


177777 


012372 
012372 
012374 
170742 


170730 


10$ 
#~1,SYNC1 
O$ 


TEMP2, SYNC1 
TEMP2 ,SYNC2 
pores eoeene 


3] BR. 
tf YES, MARK. 


INUE. 
: LOAD THE CHARACTER 


ITTO 

[LOAD THE SYNC REGISTER 
7SEL THE MISC REGISTER 
2SET TEST LOOP 


a@DQREG 
#8113, a@DQSEC 
#4 ,RO 


8 


“FLIP THE BYTES 
SET CHARACTER wines 
: TURN CLOCK OFF. 


#B1T1,aDQSEC SAND ON 
aDOREG SEL RX PRIMARY ADRESS 
#RXBUFF ,ADQSEC ;SET ADRESS 

GREG [SEL RX PRIMARY CHAR COUNT 
#36. -@DQSseEr 
@DOREG 


3SET CHAR COUNT 
E 7SEL_TX PRIMARY ADDRESS 
#SYNC1,@DQSEC =; SYNC CHAR 
@DQREG 
4-38. , aDQSEC 


acvORCSR 
aDQTCSR 


170710 
170702 


170670 
170656 
170644 
170632 


AVLYVSR 


AARRERRERRRR 
RVR N) 


a —) ss 9 Ss — — 


SESISLERERERER 


SET TX GO 
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1976 010550 005005 CL R5 sSTART TIMING 
1977 1$: @DQRCSR 31S DONE UP? 
1978 100404 BM 2$ BRANCH IF YES 


19 062705 #1,R5 i WA 
0105 BN 1$ ;BR_IF MORE TO GO 
1 sERROR=-NO RX DONE 
#TXBUFF ,RO [LOAD BUFFER POINTER 
#RXBUF F (1 [LOAD RX BUFFER POINTER 
012702 00004 #36. ,R2° :SET UP TO COUNT CHARACTERS 


012005 (RO)+,R5 :GET ANOTHER CHAR 
0121 MOV (R1)+,R4 :GET A REC CHAR 
012370 MASK ,R5 [MASK OUT UNWANTED BITS 
MP R5,R4 DO THE CHARACTERS MATCH? 
4$ BR IF OK 
2 ;ERROR~-DATA DOESN'T MATCH 
DONE ? 


; R2 TALL 
= BN 3$ :NO=-GO BACK FOR MORE 
104400 SSCOPE THIS TEST 


PRS RRL Lit top ot at 


S 


TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
THIS TEST WILL aoe AND RECV CHARACTERS 

SAT 13 BITS/PER/CHA 

DATA CHECKING WILL "be PERFORMED! 


: TEST 16 


SIUC SII IOIOISISIIOIOISIIOIOIOISISIUIOISIOIOIOIOI I IOI OIOIOI II III IIR IIIT TOTTI 
000016 001226 TST16: #16,TSTNO 
011160 001216 MOV #TST17,.NEXT 
CLEAR A.’ THE DQ11 


013256 MOV ARXBUF F ,RO [LOAD THE BUFFER POINTER 
R1 :SET UP TO CLEAR THE BUFFER 
pate ;CLEAR IT 


e? 


1998 
1999 
2000 
2001 
2002 
2003 
2004 
2006 


BP 5$ BRANCH IF NO 
000011 170500 #11 ,@DQREG SELECT THE SYNC REG 
013052 LOAD SYNCS 
160000 ;LOAD THE MASK 
012370 MASK, TEMP2 SET UP_THE MASK FOR THE 
;CORRECT SYNC CHARACTER 
001246 ROR TEMP2 SHIFT IT 


I 
001510 DQSTAT ; SINGLE SYNC CHARACTER? 
10$ NO,BR. 
177777 =012372 #~1,SYNC1 TIF YES, MARK. 
BR 20$ CONTI 
012372 TEMP2,SYNC1 [LOAD THE CHARACTER 
vets :DITTO 
2 [LOAD THE SYNC REGISTER 
aD SEL THE oii REGISTER 
170400 MO op Th -apesec :SET TEST LOOP 
RO SFLIP THE BYTES 
RO, @DOQSEC :SET CHARACTER LENGTH 


4=2!T1 ,aDQSEC : TURN CLOCK OFF 
042777 552 ' #B1T1,@DQSEC ; AND 
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CLRB @DQREG SEL RX PRIMARY ADRESS 
170340 MOV ARXBUFF ,ADQSEC ;SET ADRESS 
SEL RX PRIMARY CHAR COUNT 
170326 MO #-36. , @DQSEC SET CHAR COUNT 
@DQREG 7SEL_TX PRIMARY ADDRESS 
170314 MOV de tama ; SYNC CHAR 


170302 MOV #-38. , @DQSEC 
@DQRCSR 
170264 aa 


RS 
170252 : aDQRCSR 71S DONE UP? 
6M $ BRANCH IF YES 
000001 #1,R5 WAIT 
BN 1$ ;BR_IF MORE TO GO 
1 sERROR=-NO RX DONE 
012376 : ATXBUFF ,RO ;LOAD BUFFER POINTER 
013256 ARXBUFF ,R1 ;LOAD RX BUFFER POINTER 
000044 #36. .R2 SET UP TO COUNT CHARACTERS 


(RO) +,R5 GET ANOTHER CHAR 
:GET A REC CHAR 
012370 5 MASK OUT UNWANTED BITS 
:DO THE CHARACTERS MATCH? 
:BR_IF OK 
;ERROR=-DATA DOESN'T MATCH 
sALL DONE? 
isNO--GO BACK FOR MORE 
SCOPE THIS TEST 


Sseeseess 
RONGORS - 


aii a a ad 8 nd od od od 6) 6“ 8) od 
REKSRSARSKLVS 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


asi a ed od od ow) ow) J 


WII ES BS 
ASMNOOLO 


:TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
THIS TEST WILL XMIT AND RECV CHARACTERS 

3AT_14 BITS/PER/CHAR. 

:DATA CHECKING WILL BE PERFORMED! 


3; Vest 17 
SOIR IOIIUIIIOIUISISIIIIIIDIOIIIIOISISIOIIIDIOUIOIOIIOIUIOIIIOIOIIIIOIUIDIIUIDIDID ODIO IOUIDIOIIDI II pot 
000017 TST17: #17,TSTNO 
011510 00121 MOV ATST20,NEXT 
:CLEAR ALL THE DQ11 


013256 MOV #RXBUF F ,RO ;LOAD THE BUFFER POINTER 
R1 SET UP TO CLEAR THE BUFFER 
oe :CLEAR IT 


_— SS 


5$ ‘BRANCH IF NO 
#11, aDQREG *SELECT THE SYNC REG 
SYNC , TEMP2 SLOAD SYNCS 
#140000,MASK § :LOAD THE MASK 
MASK, TEMP2 [SET US THE MASK FOR THE 

*CORRECT SYNC CHARACTER 
TEMP2 “SHIFT IT 


: I 
DasTAT SSINGLE SYNC CHARACTER? 
#-1,SYNC1 ‘IF YES, MARK, 
208 : CONTINUE. 


elelelelelelelelelelelelelelelelolea) 

po ew fee Po PP Pe Pe be he oP Hj 

a a ae a ce ed cd ce ce ce ed ed ee a ed 
Nw 


MMMM NNNNNNNy 
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013737 72 «108: LOAD THE CHARACTER 
;DITTO 


74 208: 
0062 LOAD _THE SYNC REGISTER 
@DQREG SEL THE MISC REGISTER 
170050 aad at acaaas :SET TEST LOOP 


“FLIP THE BYTES 
RO, @DQSEC SET CHARACTER LENGTH 
170030 WBIT1,aDQSEC: TURN SCLOCK OFF... 


170022 #B1T1,aDQSEC : 

aDQREG SEL RX PRIMARY ADRESS 
170010 MO ARXBUFF ,ADQSEC ;SET ADRESS 

@DQR SEL RX PRIMARY CHAR COUNT 
167776 MO po aaa ; 


SET CHAR COUNT 
G :SEL_TX PRIMARY ADDRESS 
167764 MO ASYNC1,@DQSEC ; C 
@DQREG 
167752 Oe AE es 


CSR ; SET 

167734 :SET TX GO 

R START TIMING 
167722 :IS D UP? 

:BRANCH IF YES 

000001 WAIT 
;BR_IF MORE TO GO 
1 sERROR=-NO RX DONE 
pl esce : ATXBUFF ,RO ;LOAD BUFFER POINTER 


3256 #RXBUFF ,R1 ;LOAD RX BUFFER POINTER 
000044 #36..R2 SET UP TO COUNT CHARACTERS 


(RO)+,R5 ;GET ANOTHER CHAR 
(R1)+,R4 

012370 MASK ,R5 zMASK OU D BITS 
R5,R4 3DO THE CHARACTERS MATCH? 


4$ ;BR IF OK 
2 sERROR--DATA DOESN'T MATCH 
R2 ;ALL DONE? 
;NO=-GO BACK FOR MORE 
;SCOPE THIS TEST 


wuy 


vaste 
FERNARSVRSR 


WW 
SRARE 


aD iD DD ed a ed ed ed od wd 
SQ x 
s 


SRSVES 


RN 


BHREKKERKKRESS I 
5 at a ed 


NOMIASNDNDN INN NNNNNNNNoNoPry 
LS 
vw 
SOAakO 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
01 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


SS Ss SS SS S Ss Ss SS GS 9 oS 4 GH 


TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
THIS TEST WILL XMIT AND RECV CHARACTERS 

sAT_15 BITS/PER/CHAR. 

DATA CHECKING WILL Be PERFORMED! 


TEST 20 


SOROS I IIUIDIDIOISIOIOIOIDIIIDIDIDIOIOIIOIOIOIUIUIOIOIOIIOIOIUIOIOIOIOISISIOIDIDIOIOIOIDIOIIIUIUIDIOIIO RIOR ot 
000020 001226 TST20: #20, TSTNO 
012040 001216 MOV #TST21,NEXT 
HE BUFFER POINTE 


013256 MOV #RXBUF F ,RO :LO NTER 
R1 ;SET UP TO CLEAR THE BUFFER 
(RO) + SCLEAR IT 
R} ; DONE 7 

5$ ;BRANCH IF NO 


:CLEAR_ALL THE DQ11 
;LOAD T 


100 
101 
102 
103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 
142 
143 


POPAPENINDNYNNGPNINNININGMNINININNONNoNoNgNoNy 


OVOoOoo000 
me ed ed ed od 
me ee eed ee ed 
pS e e tte er 

— 
SREVRRAEAS 
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112777 000011 #11, @DQREG = SELECT THE SYNC REG 
;LOAD SYNCS 


013052 

100000 [LOAD THE MASK 

012370 MASK , TEMP2 :SET UP_THE MASK FOR THE 
: CORRECT SYNC CHARACTER 

001246 ;SHIFT IT 


ROR TEMP2 
001510 DQSTAT [SINGLE SYNC CHARACTER? 
10$ :1F NO, “—— 
177777 #-1,SYNC1 IF YES, MAR 
20$ ; 


BR : CONT ° 
001246 : TEMP2, SYNC1 LOAD THE CHARACTER 
: TEMP2,SYNC2 :DITTO 
TEMP2 ,aDQSEC LOAD THE SYNC REGISTER 
@DQREG SEL THE MISC REGISTER 
167520 Pt eae 2 SET TEST LOOP 


RO SFLIP THE BYTES 
RO, aDQSEC :SET ae ¥ es 
167500 #B1T1 ,@DQSEC a CLOCK OFF 
167472 ” MBIT1 ,ADQSEC AND ON 

a@DQREG SEL RX PRIMARY ADRESS 
167460 ARXBUFF ,ADQSEC ;SET ADRESS 

aD :SEL RX PRIMARY CHAR COUNT 
167446 MOV age :SET CHAR COUNT 


aD :SEL TX ‘goey ADDRESS 
167434 MO #SYNC1 ,@DQSEC YNC CHAR 
@DQREG 
167422 MO 4-38. ,aDQSEC 
a@DQRCSR 


NESEUREKRar RRS NNe 


NN NN NNNNN SO 
SPAR Wr 


on 
N 


31S DONE UP? 
BRANCH IF YES 


BR IF MORE TO GO 
1 sERROR=-NO RX DONE 
#TXBUFF ,RO [LOAD BUFFER POINTER 
A#RXBUFF ,R1 ;LOAD RX BUFFER POINTER 
#36.,R2 SET UP TO COUNT CHARACTERS 


(RO)+,R5 GET ANOTHER CHAR 
MOV P GET A REC CHAR 
012370 5 [MASK OUT UNWANTED BITS 
:DO THE CHARACTERS MATCH? 


BR IF OK 
1 oe DOESN'T MATCH 
L DONE? 


“N= BACK _FOR MORE 
; SCOPE THIS TEST 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
C 
0 
0 


ma kD ce a ed ed ed ed nd ed ed nd ed od wd 


So 

3 
So 
Ww 


soe 
Sesse 


8s 


WW 
Sixx 


2 


:TEST OF TRANSMITTER AND RECEIVER CHARATER LENGHTHS 
STHIS TEST WILL aN AND RECV CHARACTERS 

SAT 16 BITS/PER/CHAR 

[DATA CHEC“ING WILL BE PERFORMED! 


21 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
2188 
2189 104 
2190 
2191 
2192 
2193 
2194 
2195 
2196 
2197 
2198 
2199 
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44 
PROGRAM INITIALIZATION AND START UP. 
; VEST 2 


o7r0OOo 
Soo Pun 
$e 


SRII=55 
3 _ 


seree goon 
RoSauaw VNVVE 


WIIWN 
N 


900021 
014306 


013256 


000011 
013052 
000000 
012370 


001246 
001510 


177777 


167054 
167042 
000001 
012376 
013256 
000044 


012370 


167170 


167150 
167142 


167130 
167116 
167104 
167072 


PRiiaialielliatahatatelalalehalehehehshehelehehahehehahhehahahehshehehelehehehehehahehehehehehehetahatehahehehehahateheteheheheteddehehel 


TST21: 


#21,TSTNO 
#. EOP ,NEXT 


ARXBUFF ,RO 
R1 

(RO) + 

R1 

5$ 

#11, aDOQREG 
SYNC, TEMP2 
#000600. MASK 
MASK, TEMP2 
TEMP2 

DOSTAT 
#-1,SYNC1 
20$ 
TEMP2,SYNC1 
TEMP2, SYNC2 
TEMP2, aDQSEC 
@DOREG 
#B1T3,aDQSEC 
#0,RO 

RO, @DQSEC 
#B1T1, aDQSEC 
#B81T1,aDQSEC 
@DOREG 
ARXBUF F , ADQSEC 
@DOREG 

4-36. ,@DQSEC 
@DOREG 
#SYNC1,@DQSEC 
@DQREG 
#~-38. , ADQSEC 
aDORCSR 
@DOTCSR 

R5 

@DORCSR 
#1,R5 

Is 

#TXBUFF ,RO 
#RXBUF F< R1 
#30. ~R2 

(RO) +,R5 
(R1)+_RG 
MASK ,R5 

R9 Re 


- 


CLEAR ALL THE DQ11 
[LOAD THE BUFFER POINTER 
iSET ts CLEAR THE BUFFER 


BRANCH IF NO 
‘SELECT THE SYNC REG 
LOAD SYNCS 


‘LOAD THE MASK 
:SET UP THE MASK FOR THE 
Shipton CHARACTER 


ie — CHARACTER? 
iF YES, 

; CONTI 

: LOAD THE CHARACTER 


ITTO 
[LOAD THE SYNC REGISTER 
SEL THE MISC REGISTER 
eSET TEST LOOP 


SFLIP THE BYTES 
7 SET yi _— 
; TURN CLOCK 


AND ON 

7SEL RX PRIMARY ADRESS 
SET ADRESS 

7SEL RX PRIMARY CHAR COUNT 
SET CHAR COUNT 

:SEL_TX PRIMARY ADDRESS 

7L SYNC CHAR 


SSTART TIMING 
31S DONE UP? 
aa IF YES 


‘BR IF MORE 10 60 


POINTE 
SET UP TO COUNT CHARACTERS 


GET ANOTHER CHAR 

7GET A REC CHAR 

:MASK QUT UNWANTED BITS 
:DO ee MATCH? 


BR IF 
;ERROR=-DATA DOESN'T MATCH 
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005302 : sALL DONE? 


001367 :NO=-GO BACK FOR MORE 
104400 :SCOPE THIS TEST 


0 
BYTE 26,26 
-BYTE 26,26 


“B<11171711711111111> 
“B<0000000000000000> 
*B<1010101010101010> 
Rp IAIN IDS be 
“B< 


TXBUF F : 


#16. ,R5 
#B1T4, @DOREG 
0 #140 ADORE C 
105277 166416 INC aDORE G 


012 
01 
01 
01 
0127 
01 
01 
012: 
01 
01 
01 
01 
01 
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R5 

1$ 

@DOREG 

@DQRCSH 

#16. ,R5 
166370 : #10, aDQREG 

aDQSEC 
166356 #14 ,aDQREG 

a@DQSEC 

@DQRCSH 

R5 


001362 2$ 

105077 C @DOQRCSH 
-MSTCLR: 

112777 MO AMISC. ,ADQREG 

012777 000040 #B1TS ,aDGSEC 

00000 


2 
026 
026 


000000 
013256 


26,26 


se OF PASS 
: TYPE NAME OF TEST 
: UPDATE PASS COUNT 
;CHECK FOR EXIT TO ACT=11 
SRESTART TEST 


LSTERR ;CLEAR LAST ERROR PC 
ERRFLG ; CLEAR ERROR FLAG 
PASCNT UPDATE PASS COUNT 
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014452 


001230 164606 PASCNT ,@LIGHTS DISPLAY PASS COUNT 
001276 SAVNUM 


001504 001276 
000042 MO 42,R CHECK FOR ACT=11 OR DDP 
7 1F NOT, CONTINUE TESTING 


R 
LOGICAL: 
J 


N 
RESTRT: 
002254 001214 MO #TST1,RETURN 
002254 TST] 
XCSR: 
002 -BYT 6.2 


XVEC: 
002 -BYTE 3.2 


MPASS: 


KERR: 
6.2 


LOOP AND INTERATION HANDLER 


wet 


164474 "8g #31714, aSWR 


_ 

$8 

wi 

N 
MNWON> 


_ 
WSN INE 


3$ 

aTKCSR 

3$ 
a@TKDAR,RO 


& 
pars 
™~ 
NEN 
n= 


#SwW11 ,aSWR 
2$ 


LPCNT 
LPCNT, I COUNT 
3$ 


Ss8Nssq 


#°*,,1CQUNT 
NEXT RE TURN 


AMA WIR 
NNNNIMONN 


oOo 
—t aot 
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014574 013716 001214 3$: MOV RETURN, (SP) 
0146 000002 RT] 


BRwW: 1407 
BRX: 432 


:CHECK FOR FREEZE ON CURRENT DATA 


-SCOP1: CKSWR 
001000 164362 ato ene 


001220 ’ LOCK, (SP) 


TELETYPE OUTPUT ROUTINE 
MOV R5,-(SP) 
000002 MOV 
000C02 900002 
016316 
BNE 300$ 
010000 164322 Ge enee 
(R5) 
BP 2$ 
164320 aTPCSR 
BP « 


000015 164312 MOV #15, aTPDBR 
164304 aTPCSR 


4 
164276 #12,aTPDBR 
: aTPCSR 


000012 
164270 
BP 2$ 
164264 (R5)+,aTPDBR 
BNE 1 
(SP)+,R5 


sASCII STRING INPUT ROUTINE 
R3,-(SP) 
R4,-(SP) 


014756 MO a4(SP),. 
000004 #2,4(SP) 


000004 
000002 
017110 ; #INBUF RS 
000007 #7 ,R3 
aTKCSR 
1$ 
@TKDBR, (R4) 
#200, (R4) 
(R4) 425 
BNE 
TYPE ,MCRLF 


ea IST 
(MPR Ot RG) +, 15 
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INSTR2 
164152 164154 MOVB @TKDBR,aTPDBR 
164146 2$: . 


R3 


BR - INSTG 
. INSTE: R3,-(SP) 
MOV R4,-(SP) 
~ INSTG: 


016316 @ARDSW 
BEQ 400$ 
016476 TYPE ,MCRLF 
400$: BR . INST1 
INSTR2: MOV (SP) +,R4 
ATi (SP) +,R3 


CONVERT ASCII STRING TO OCTAL 


R5,-(SP) 
R4,~-(SP) 
4(SP) ,R5 
(R5)+,LOLIM 
(R5)+,HILIM 
(R5)+,DEVADR 
(R5)+,LOBITS 
(R5)+, ADRCNT 
R5,4(SP) 

R5 


o--COO000O 
anh outta anid ext at anh 
a) 


ee ed a a ce ce ed ee ee ce eed ed cd ed eed eed od 
MN RNUANORE 


NERSSENEREKSRSRSER 


SSS 


ROSS 


BR 1$ 

000015 sI1S FIRST CHARACTER A <C(R> 
BNE 120 

016316 71S CKSWR ROUTINE BEING USED 
BNE p 
INSTER 
BR 


015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
015 
915 
015, 
015 
015 
015 
015 


MOMENMNONNONNoNofy 
~ on 


sTEST TO SEE IF NUMBER 1S WITHIN LIMITS 
015312 (Mp KS HILIM 
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PARERR 

015316 R5,LOLIM 
PARERR 

015316 LOBITS,R5 
BN PARERR 


;STORE NUMBER AT SPECIFIED ADDRESS 
015374 DEVADR ,R4 
i$: R5, (R45 + 
000002 #2,R5 
015317 ADRCNT 
BNE 1$ 


(SP)+,R4 
(SP)+,R5 


OBITS: 0 
ADRCNT=LOBITS+1 
sSAVE PC OF TEST THAT FAILED AND RO=R5 
-SAVO5: MOV 4(SP) , SAVPC 
;SAVE RO=-R5 
Sv05: R5,SAVR5 
MO 


RO. SAVRO 
RESTORE RO-R5 


SAVRO,RO 


SAVR5.R5 


lelelelelelel=a) 


CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


ad ad ed ad od od od 
QAMAAAYIWIVY) 
it ad ad 


SRRVSRRG 


R~=(SP) 
siS¢SP). R) 


lelelelelelelele) 
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017152 001250 
000012 


060, 
R3,(RO)+ 
R4 
RS 


R4 
R5 


3$ 
#MDATA,R3 
-(RO), R3) + 
CHRCNT 

4$ 

SPACNT 


6$ 
#040, (R3)+ 
7“ NT 


(RB) 


RRRRRRRRRRS 
OWNAOUSWN-O 


015632 WRDCNT 
BNE 1$ 


001250 017152 TEMP3, TEMP 
(SP)+,R5 
(SP) +,R4 
(SP)+,R3 
(SP)+,R1 
(SP)+,RO 


WRDCNT: 
CHRCNT: O 
SPACNT=CHRCNT +1 
BINWRD: C 
3s TRAP DISPATCH SERVICE 
+ ARGUMENT OF TRAP IS EXTRAC 


TED 
sAND USED _AS OFFSET TO OBTAIN POINTER 
:TO SELECTED SUBROUTINE 


: MOV (SP) ,=(SP) GET PC OF RETURN 
SUB #2, (SP) :=PC OF TRAP 
MOV a(5P), (SP) :GET TRP 
ASL ») sMULTIPLY TRAP ARG BY 2 
BIC #177001, (SP) CLEAR UNWANTED BITS 
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2648 015660 062716 001314 ADD #. TRPTAB, (SP) :POINTER TO SUBROUTINE ADDRESS 
2649 015664 017616 000000 MOV a(SP), (SP) ‘ SUBROUTINE ADDRESS 
2650 015670 000136 JMP a(SP)+ :GO TO SUBROUTINE 
2652 :ERROR HANDLER 
2653 
2654 015672 104414 .HLT: CKSWR 
2655 015674 032777 010000 163276 BIT #SW12,aSWR 
56 015702 001406 _ BEQ XBX 
2657 015704 105777 163300 TSTB aTPCSR 
58 015710 100003 BPL 
2659 015712 112777 000207 163272 MOVB 4207 @TPDBR 
015720 032777 020000 163252 XBX: BIT #Swi5, aSwWR 
2661 015726 001074 BNE HALTS 
015730 021637 001234 CMP (SP) LSTERR 
2663 015734 001404 BEQ 1$ 
2 015736 011637 001234 MOV (SP) ,LSTERR 
2665 015742 105037 001312 CLRB  —ERRFLG 
015746 104406 1$: SAVOS 
2667 015750 011605 MOV (SP) .R5 
2668 015752 162705 000002 SUB #2,R 
2669 015756 011504 MOV (R5) RS 
2670 015760 006304 ASL R4 
2671 015762 061504 ADD (R5) RG 
2672 015764 006304 ASL R4 
2673 015766 042704 177001 BIC #177001 ,R4 
2674 015772 062704 017624 ADD #. ERRTAB,R4 
2675 015776 012437 016070 MOV (R4) +, ERRMSG 
2676 016002 012437 016102 MOV (R4) +. DATAHD 
2677 016006 011437 016114 MOV (R4) ,DATAB 
2678 016012 105737 001312 TSTB —CERRFLG 
2679 016016 001403 BEQ TYPMSG 
016020 005737 016114 TST DATABP 
2681 016024 001027 BNE TYPDAT 
016026 104402 TYPMSG: TYPE 
2683 016030 016755 MTSTN 
016032 10441 CNVRT 
2685 016214 XTSTN 
016036 10440 TYPE 
2687 016040 017043 MERRPC 
2688 016042 104411 CNVRT 
016044 016206 ERTABO 
2690 016046 104402 Y 
2691 016050 016476 MCRLF 
2692 016052 112737 177777 001312 MOVB  #=1, ERRFLG 
2693 016060 005737 016070 TST ERRMSG 
269% 016064 001402 BEQ WRKO.FM 
2695 016066 104402 TYPE 
2696 016070 000000 ERRMSG: 0 
2697 016072 ' WRKO.FM: 
2698 016072 005737 016102 TST DATAKD 
2699 016076 001402 BEQ TYPDAT 
2700 016100 104402 TYPE 
2701 016102 000000 DATAHD: 0 
2702 016104 005737 016114 TYPDAT: TST DATABP 
2703 016110 007402 BE RE SREG 
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CONVRT 
DATABP: 0 
RESREG: 
163054 HALTS: 


@SwWR 

EXITER 

000002 MO 2(SP) ,RO 
EXITER: 

001232 : ERRCNT 

000400 163024 #SW08 ,aSWR 

002000 163014 #SW10,aSWR 

001216 001214 NEXT RETURN 


001200 “$: #STACK SP 
163010 @RE TURN 


002 . 6.2 


002 3.2 
TSTNO 
ENTER HERE ON POWER FAILURE 


" MOV #RESTART , 24 :SET UP FOR POWER UP TRAP 
HALT ‘HALT ON POWER DOWN NORMAL 


zPROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 


#.PFAIL,24 SET UP FOR POWER FAILURE 
ASTACK, SP 
TEMP 


274 


ERRFLG 
LSTERR 


@RE TURN 


CHECK SWITCH REGISTER ROUTINE. CHECKS FOR “G TO ALLOW CHANGING 
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sOF 10C.176. 
;LOCATIONS USED: 
RDSW: «WORD OQ 


000042 . : a 

000176 ASWREG, SWR SOFTWARE SWITCH REGISTER PRESENT 
BNE OUT ; GET OUT 

162642 aTKCSR 
BP OUT 

162636 


@TKDBR, .MSG 
#177600, .MSG 
#7, .MSG 


:1S IT A <*@ 
BNE OUT 

TYPE ,SCNTG 

COM @ARD 

TYPE , SMSWR 


CNVRT , SWRESC 
INSTR, SMNEW 
PARAM 


0 
177777 
SWREG 

0,1 
TYPE .MCRLF 
CLR @ARDSW 


a <377>/*G/ 
020075 $MSWR: . <377>/SWR= / 


053505 _— / NEW= / 


?/ 


ig <377> 
043040 rs: * <377>/PWR FAILED. RESTART AT TEST / 


<377>/END PASS DZDQH / 


Saye 


<377>/R/ 
<377>/PROGRAM INDICATES NO DEVICES PRESENT./ 


ABAM-AWMNOS 


044777 <377>/ INSUFFICIENT DATA:/ 
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044503 047105 
040504 040524 


$3 1202 020124 MTSTPC: .ASCIZ <377>/TEST PC-/ 
020113 MLOCK: .ASCIZ <377>/LOCK ON SELECTED TEST/ 


000 
051123 020072 MCSRX: .ASCIZ /CSR: / 
041505 020072 MVECX: .ASCIZ /VEC: / 
051501 042523 MPASSX: .ASCIZ /PASSES: / 
000040 
ead! 051522 MERRX: .ASCIZ /ERRORS: / 


052377 051505 MTSTN: .ASCIZ <377><377> /TEST NO: / 
047516 020072 


saett MNEW:  .ASCIZ <377>/SET SWITCH REG TO DQ11'S DESIRED ACTIVE./ 


2105 
053111 
035102 000040 MERRPC: .ASCIZ /PC: / 
MHEAD: . <377>/MAP OF DQ11 STATUS/<377> 


952524 


6,3 
6.2 


BUFFERS FOR INPUT-OUTPUT 


YINOn 


<15><12>/RECEIVER DONE PRIMARY net: SET! / 
<15><12>/DATA COMPARISON ER es 

<15><12>/DQ ERROR FLAG SET. 

<15><12>/NO neck ives INTERRUPTS!!! / 
<15><12>/EXPECTED FOUND RX ADDR. TX ADDR. MASK / 
<75><12>/EXPECTED RECEIVED / 

<15><12>/DQERR / 


Sss 
DOOCOOCOCONS/ 
— Se SI —_ 
Walealealealealealesl eer 
RRARSRR 
MMS NON?N 
OnR-UMOW 
Ashen we 
NONIUIOS Bron 





CZDQH MACY11 werk 


CZ2DQHD.P11 


017556 


09-JUN- 
017556 
000005 


006 
001270 
001266 
001260 
001256 

006 
012370 
000002 

003 
014302 

003 
014274 
000001 


006 
014266 


8 07 


= -78 08:41 PAGE 56 


004 
001 
004 
004 
002 


006 
002 


002 


GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) 


-ERRTAB: 


«END 


6,4 
6,1 
6.4 
6.4 
6.2 


ins) 


iN 


D5 


SEQ 0055 


. % 
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ABBIT = 002000 
004000 
014300 
015317 
010000 
020000 
015636 
000001 


1491 1492 1560 1561 
1899 1964 1965 2030 


1625 1694 1762 1828 1894 


_——_ 2 Sh 


a 
= 
— 
— 
— 


2654 
2747 


1067* 


jelelelele) 

—2 23554 
=i 
* 


— 
N 


1045 1047 


8 
Sesx sae 


888888 
SROR 
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be 
SaBe 
~NO- 
a a 


=» 
& 


1363* 
1779 


— os st 


SW -OS OWOONO 
‘0.00.0 
=». 


Nes 


—©o 
* 2 » 


—_— — 4 3 
Oa—-A on No 
NW 
as -s e 
NONIN ee eS Ss 
WOON 
Ys oes ee 
NWNROSSHSO 
a eae eR Ree 


Owns 
Stee 
Co W 
see 

O.co 

row 

ss 


NOOO 
<a 
se 


NOUS WIN 

» 2) 

ar 

a 
od ed ed eed ed ed ed eed ed 
Qe Ne ee 
ne ate ah ene 
=n WNW 
aeepepeenene 


Se 
Et 


001374 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
83 1 
; 
2 
e 
e 
1 
Pa 


—— —fynon— -42— -2 2 
™ 


Codon-- 
BCOCOWVr 
o>? MoO 
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001442 


2883 
2714 
2420* 


2878 


2422* 


1161* 
1909* 


1158* 


2665* 


G 5 


CROSS REFERENCE TABLE == USER SYMBOLS 


1183 1186* 
975% 2041* 


2678 2692* 


1193* 
2107* 


2749* 


“1295* 


2173* 


1364* 
2239* 


1433* 
2305* 


1502* 


SEQ 0058 


1571* 
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016536 236 28044 


$3° 1534* 1603* 1672* 1741% 1807* 1873* 


13 14 
2423 27 


2538 2540 


1104* ; 2425* 2719* 


SAVACT 
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2378* 2380* 
2873 
2871 


2869 
2867 


ronrorororenory 
NM 
Ww 


1383 1592 1661 1730 1796 1862 1928 1994 


981 988 994 1013 1021 2408 2415 
2717 2767 


1749 


_—wW 


» 2. 


182? 
20 


- 2s Neen SS Ne 
YI NONE MAARWYIYT 
SW? NWA NUTINI 

sss ass 


RMS EWONOLMOM NOW 


1622 
17218 
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1826 1881* 1885* 
2013* 20 
2147s 


1241* 
169% 


71 
73 


4 

4 

451 24 2657 
453* » 2659* 
0 
0 
0 


37* 1326* 1395* 1464* 1533* 
04* 21 2202+ 2728 2756 


: 
2 
2 
2 
2 
1 
2 
10374 


7 


1020* 246094 


1578 1647 1716 1784 1916 1982 


06 
58 
2 
96 
65 
16 
22 
cba 
46 
1302 
80 
58 
23a 


973 983 990 1015 1033 1058 2359 2361 
2489 2495 2584 2625 2682 2686 2690 2695 


017050 
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014460 

014272 

014064 1226 23394 
17076 Qs 


23374 


lelelelelelelea) 
<P and anh aa anh and 


13974 
1873 


2494 
2771" 2772* 2773 


2 
30 


706 
32 

5 

6 
5360 
5320 
4474 
$608 


weo— 
wR 


2732 §=2740 


0 
01 
01 
01 
01 
01 
01 
01 
01 
01 


28338 
Ww 


Lo) 
~ 
“SI 
o 
\y 
© 
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CZ2DQHD.P11 


09=J 


ERRORS DETECTED: 
DSKZ:CZDOHD ,DSK2Z: etc SEQ=DSKZ:CZ2DQXX MAC ,DSKZ:CZDQHD. P11 
7 -9 SECONDS 


TIME: 


11 


CROSS REFERENCE TABLE == USER SYMBOLS — 


0 


RUN- 
RUN-TIME RATIO: 46/1920, 8 


CORE USED: 


19K 


DOCUMENT PAGES: 


(37 PAGES) 
63 





